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Linguaggio 
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dall’A alla Z 


Il disassemblato 
delle routine 
grafiche di Toma 



Ora anche su disco 



" MS-DOS & GW-BASIC emulator" é anche su disco. Per quanti hanno acquistato la versione su 
cassetta ed inviano la relativa prova d'acquisto, il dischetto é disponibile a lire 15.000 (+ lire 3.000 
per spese di spedizione). Non occorre inviare la cassetta né tantomeno il manualetto di istruzioni. 
Chi non é in possesso della cassetta può richiedere il disco ed il manualetto al prezzo normale di 
lire 25.000 ( + lire 3.000 per spese di spedizione). 

Per una veloce evasione dell'ordine inviate un assegno bancario o circolare non trasferibile 
all'ordine della "Systems Editoriale" (V.le Famagosta. 75 - 20142 Milano). 
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SUL SENTIERO DELLE GIUBBE ROSS£ 


Una vera esperienza di vita per i ragazzi/e oltre i 10 anni 
Abbinare lo studio della Lingua Inglese, al contatto di una natura incontaminata 
Una vacanza-studio unica ed indimenticabile, in uno scenario che non ha confronti. 



Questo tipo di vacanza è 
indirizzato sia ai principianti, sia 
a coloro che hanno già 
maturato una conoscenza della 
Lingua Inglese, ma il 
denominatore comune è il reale 
contatto con la natura. 

• Un viaggio di 19 giorni 
attraverso la Provincia 
dell'Ontano a bordo di un 
"Super Van" da 15 posti, con 
aria condizionata e stereo 
System, con l'assistenza di 
personale qualificato. 

Ogni 10 partecipanti ci sono 4 
persone di assistenza. 

Le attività standard includono: 

• partecipazione alla vita di 
campeggio, canoa, tracking. 
pesca, white-water rafting, 
ginnastica, nuoto e studio della 
Lingua Inglese. 

Quest'ultimo aspetto sarà curato 
da insegnanti specializzati dello 
SHENKER INSTITUTE OF 
ENGLISH. con due ore di 
lezione al giorno, seguendo il 
METODO SANDWICH di 
GEORGE SHENKER. 


• Viaggio Andata/Ritorno 
MILANO/TORONTO in classe 
turistica. 

• Tre pasti al giorno dalla 1 a 
colazione del secondo giorno, al 
lunch del 17 giorno." 

• Full-Day Immersion di Lingua 
Inglese con personale 
SHENKER più 2 ore al giorno di 
corso intensivo. 

• Materiale audio-didattico per il 
Corso comprendente: 

■ Walkmann 
" Cassette 

" Libri di testo e work book 

• Assicurazione completa 
EUROPE-ASSISTANCE. 

• Pernottamenti in hotel di 
categoria superiore e in 
Campeggi nei "NATIONAL 
PARKS". 

• Tutte le tasse d'iscrizione, 
attrezzatura da pesca 

• canna da pesca con mulinello 

• licenza di pesca 

I costi di noleggio del Super 
Van e tutti i costi annessi: 

" benzina 

• autostrade con pedaggio 


Il programma si divide in 4 diversi turni a partire dall'ultima settimana di giugno 
Prenotazioni e informazioni presso: 


SHENKER INSTITUTE OF ENGLISH - Corso Monforte. 36 (MI) - Tel. 02/700332/700363/700929 
ore ufficio - Sig.ra Sawchik - Olivieri (ore serali) Tel. 039/513211 
UVET - Viale Ferdinando di Savoia. 4 (MI) - Tel. 02/675061 (30 linee) O* 

ore ufficio - Sig. Biagi 

SYSTEMS - Viale Famagosta. 75 (MI) - Tel. 02/8467348/9 
ore ufficio - Sig. Tidone 
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Con questo numero speciale ci rivolgiamo ai lettori, vecchi e nuovi, di riviste specifiche 
per i prodotti Commodore. 

Ci auguriamo che i lettori ne decretino il successo, incoraggiandoci a proseguire nella 
pubblicazione di una collana dedicata a monografie di particolare interesse. 

FI lettore più attento avrà notato con piacere che gli argomenti trattati nel fascicolo sono 
due e non uno soltanto, come abbiamo appena affermato. 

I due argomenti, però, (Linguaggio Macchina e Grafica del C/64) sono slegati tra loro 
soltanto in apparenza. Come ognuno ben sa, infatti, è impossibile gestire la grafica in alta 
risoluzione limitandosi al linguaggio Basic. 

Risulta indispensabile affidarsi interamente al linguaggio Macchina (o. quantomeno, al- 
l'Assembly) per generare animazioni, disegni e grafici ad una velocità soddisfacente. 

Ecco, dunque, giustificata pienamente la scelta di informare il lettore, grazie ad una parte 
propedeutica sul linguaggio macchina, indispensabile per comprendere pienamente la se- 
conda parte, specifica sulle routine grafiche. 

Sia che il nostro lettore sia interessato allo studio del solo linguaggio macchina, sia che 
desideri approfondire la conoscenza della gestione della grafica, il presente fascicolo rap- 
presenterà un prezioso manuale da tenere sempre a disposizione nei "pressi" della 
tastiera. 

ÌJt comprensione degli argomenti trattati non sarà privilegio di pochi, come, purtroppo, 
capita di costatare esaminando pubblicazioni analoghe: numerosi programmi di applica- 
zione, da provare con gran facilità, esempi semplici e alla portata di tutti (anche dei princi- 
pianti), schemi di immediata comprensione, non potranno che facilitare l'ingresso del letto- 
re nel meraviglioso mondo dei microprocessori e della gestione della memoria. 


Alessandro de Simone 
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Gli autori 



Gli autori degli argomenti trattati 
nel presente fascicolo sono Danilo 
Toma. Simone Bettola. Fabio Sorga- 
lo. Giancarlo Mariani e. in minima 
parte, il sottoscrino. 

Danilo Toma è prossimo alla lau- 
rea in Economia e Commercio pres- 
so l'università Bocconi di Milano. 
Riservato, studioso e oltremodo sim- 
patico. si è dedicato allo studio del Si- 
stema Operativo del Commodore 64 
fin da quando riusci a procurarsene 
uno dei primi esemplari (agli inizi 
dell'83). La carenza di software di 
quei tempi lo costrinse a realizzare 
numerosi programmi di utility che lo 
aiutassero nella programmazione in 
Linguaggio Macchina e che propose, 
per la pubblicazione, alla Systems E- 
ditoriale. La prima stesura di un pro- 
gramma che consentiva lo sfrutta- 
mento intensivo del linguaggio mac- 
china per la gestione della grafica 
venne pubblicato sulla rivista Com- 
modore Computer Club N.10 (aprile 
'84). La versione che. invece, consen- 
tiva di aggiungere nuovi comandi 
Basic specifici per la grafica tridi- 
mensionale. vide la luce poco più tar- 
di (C.C.C. N. 14). L'entusiasmo dimo- 
strato dai lettori per le ormai famose 
Routine Grafiche di Toma lo indusse 
a ampliare il set dei comandi fino a 
giungere alla versione definitiva, 
pubblicata nel presente fascicolo. 


Simone Bettola, neo matricola del 
Politecnico di Milano, ha iniziato 
per caso la collaborazione con la Sy- 
stems Editoriale il giorno in cui capi- 
ti in Redazione perla richiesta di al- 
cuni numeri arretrati. Bastò una bre- 
ve conversazione per capire che l al- 
lora studente del Liceo Scientifico a- 
veva stoff a per trattare argomenti im- 
pegnativi. Gli fu affidato il compito 
di proseguire le puntate sul linguag- 
gio macchina, appena iniziato su 
Commodore Computer Club, e di 
collaborare con altre iniziative soft- 
ware della Systems Editoriale. Verrà 
tra breve impegnato nello sviluppo 
del settore Hardware e nell'affronta- 
re tematiche relative a sistemi supe- 
riori. come l'Ms-Dos. Attualmente 
sviluppa sofware per simulazioni di 
carattere scientifico e non disdegna 
di lavorare in Assembler sul PC 
IBM. 

Fabio Sorgato è uno studente del 
liceo scientifico che ho conosciuto 
grazie al suo amico Giancarlo Ma- 


riani (studente di informatica) e che. 
come quest'ultimo, è diventato un 
prezioso collaboratore della rivista 
Commodore Computer Club. Fabio 
e Giancarlo sono tra i più validi e- 
sperti del C/64 che abbia mai cono- 
sciuto: il Sistema Operativo, il lin- 
guaggio Basic, la gestione della grafi- 
ca e del suono del popolare computer 
non hanno segreti per loro che. nei ri- 
tagli di tempo, si dilettano a scovare i 
"bug" del C/64. Tra le loro opere più 
recenti, a parte i numerosi program- 
mi e articoli pubblicati sulle riviste, 
segnaliamo l'ultimo nato, il simula- 
tore di Gw-Basic, scritto l'estate scor- 
sa rinunciando, in parte, alle vacan- 
ze. Fabio e Giancarlo, attualmente, 
oltre che a collaborare con la Sy- 
stems Editoriale, sono anche consu- 
lenti di informatica presso software 
house. Sono, entrambi, poco più 
che diciottenni. 

Alessandro de Simone. cioè il sot- 
toscritto. dirige la rivista "Commodo- 
re Computer Club" e la sezione 
“Commodore” della rivista "Perso- 
nal Computer”. Non volendo, per ov- 
vi motivi, tracciare un autoritratto, 
preferisco rispondere, a chi mi chie- 
de di che cosa mi occupo, che faccio 
il Talent Scout: di giovani, natural- 
mente. "condannati" a diventare af- 
fermati professionisti di domani... 

Alessandro de Simone 
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“Commodore Speciale” 
tutto su disco! 



lettori interessati a... non digitare i 
(lunghi) programmi pubblicati su 
questo fascicolo, possono far richie- 
sta del dischetto contenente TUTTI i 
listati Basic di "Commodore Specia- 
le". Sono presenti anche numerosi 
altri programmi, già pubblicati su 
C.C.C. che saranno utilissimi grazie 
alla stretta aninenza con gli argo- 
menti trattati nel presente fascicolo. 

Per essere più espliciti, pubblichia- 
mo qui di seguito la Directory del 


floppy disk che può esser vostro per 
una cifra addirittura ridicola. 

Ricordiamo che i programmi pos- 
sono esser richiesti SOLTANTO su 
dischetto: si prega di astenersi dal 
chiederli su nastro, onde evitare spia- 
cevoli rifiuti. 

Il costo da sostenere perla riprodu- 
zione dei nastri, infatti, ci costringe- 
rebbe ad offrire il package a prezzi 
non in linea con la nostra politica 


commerciale impegnata ad offrire 
software di qualità a cifre irrisorie. 

Coloro che desiderano procurarsi il 
package su disco devono infatti limi- 
tarsi ad inviare in Redazione la mo- 
dica cifra di L. 12000. (oltre a L.3000 
per le spese di spedizione). Non ci è 
possibile, infatti, inviare materiale 
contrassegno. 

Compilate un normale modulo di 
C/C postale indirizzando a: 





C/C postale N. 37952207 
Systems Editoriale 
Viale Famagosta. 75 
20142 Milano 

Non dimenticate di indicare chia- 
ramente. sul retro del modulo (nello 
spazio indicalo con "Causale del ver- 
samento") non solo il vostro nomina- 
tivo completo, ma anche il nome del 
software desiderato: 


"Commodore Speciale: le routine 
grafiche su disco." 

Chi volesse ricevere più celermente 
la confezione può inviare la somma 
richiesta mediante assegno circolare 
oppure normale assegno bancario 
non trasferibile (o barrato due volte) 
intestato a: Systems Editoriale. Mi- 
lano. 

Un normale modulo di conto cor- 


rente. infatti, impiega circa due mesi 
(provare per credere!) per giungere al 
nostro indirizzo. Una lettera, invece, 
arriva anche in una sola settimana. 

Inviate l'assegno, accompagnato 
da una lettera in cui specificate la ri- 
chiesta. al solito indirizzo: 

Systems Editoriale 
Viale Famagosta. 7S 
20142 Milano 




Corso di 

linguaggio macchina 


Premessa 

Questo mini-corso c destinato a 
fornire una certa conoscenza della 
programmazione in Linguaggio Mac- 
china a chi non si è mai avvicinato 
alla struttura interna del proprio 
computer e che avverte ormai le limi- 
tazioni imposte dal Basic. 

Innanzitutto è bene chiarire alcuni 
concetti di base: il Linguaggio Mac- 
china ed il linguaggio Assembler 
(che non sono sinonimi, anche se in 
definitiva possono essere considerati 
uno come la semplificazione dell'al- 
tro) non sono riservati ad una ristret- 
ta elite di gcniacci computeromani 
con almeno tre lauree. 

Anzi, potrà sembrare strano, ma. 
parlando in termini di Informatica, il 
linguaggio più semplice in assoluto 
(per la macchina, naturalmente) vie- 
ne considerato appunto il Linguag- 
gio Macchina: a questo fa seguito 
■'Assembler, che (come vedremo) 
grazie alla tecnica dei codici mnemo- 
nici. si presta maggiormente ad esse- 
re utilizzato dall'uomo, l'erma restan- 
do la stretta corrispondenza con il 
precedente. 

Il Basic, come il Pascal, il Cobol. il 
Forth ed altri ancora, sono linguaggi 
più "evoluti", perchè più vicini al- 
l'uomo. ma risultano di difficile in- 
terpretazione per la macchina. Al- 
l'ultimo gradino dei linguaggi vi so- 
no i cosiddetti "applicativi", che ri- 
guardano quasi esclusivamente i 
Personal Computer veri e propri che 
si occupano più da vicino di un parti- 
colare settore di interesse, come la ge- 
stione di testi, gli archivi i Data Base 


e via dicendo: si tratta di veri c propri 
linguaggi di particolare semplicità c 
praticità per l'utente, ma che nacon- 
dono programmi di dimensioni ipcr- 

Conosciamo la CPU 

Ma non allontaniamoci troppo c 
torniamo al nostro microprocessore. 
Questo egregio componente, che può 
essere chiamato anche "chip" dagli 
elettronici oppure "CPU" (Central 
Proccss Uniti, dagli informatici, è il 
cuore di tutto il sistema. Nel caso del 
Commodore 64, del Vie 20. del CI 6. 
del Plus4 e del CI 28 (nella versione 
64) il microprocessore è uguale a par- 
te le sigle: si tratta del famigerato 
65l0(6502 e7501). Percomodità fare- 
mo riferimento a questo, poiché tra i 
vari chip variano solo alcune caratte- 
ristiche elettroniche che non interes- 
sano in questa sede. 

La peculiarità del chip è quella di e- 
seguire una serie di operazioni rico- 
noscendole e differenziandole tra lo- 
ro grazie ad un codice numerico in 
base binaria di otto cifre. Che cosa 
vuol dire tutto ciò? Semplicemente 
che. a seconda del codice, il circuito 
integrato è in grado di compiere ope- 
razioni elementari sui registri interni 
c sulla memoria del computer. Cono- 
scere il Linguaggio Macchina signifi- 
ca conoscerne i codici e sapere quale 
particolare operazione è abbinata a 
ciascuno di essi. 

L'inizio 

Quando si parla con i possessori di 
calcolatrici programmabili che in- 


tendono allargare le proprie cono- 
scenze sui computer, ci si sente chie- 
dere quante linee-programma c quanti 
dati può memorizzare un personal, 
evidenziando, appunto, una delle 
differenze notevoli dell'organizza- 
zione dati-programmi esistenti tra i 
personal e le programmabili. 

In effetti è più corretto dire che il 
microprocessore ed il Sistema Ope- 
rativo del computer, o della calcola- 
trice. sono gli elementi che gestisco- 
no i dati in un modo per cui. a livello 
macroscopico, è possibile parlare di 
dati, programmi, istruzioni, eccetera. 

A livello elementare, invece, un mi- 
croprocessore. qualunque esso sia. 
tratta in modo automatico il conte- 
nuto di una successione di locazioni 
di memoria che di per sé possono 
contenere, indifferentemente, dati 
oppure istruzioni. 

Un microprocessore, pertanto, la- 
vora in un modo che è quello confor- 
me alle specifiche della casa costrut- 
trice. Chi costruisce un computer, 
che si basa su un particolare proces- 
sore. deve crearvi "attorno" il cosid- 
detto "Firmware" rappresentato dal 
Sistema Operativo (O.S.) ed. even- 
tualmente. dal linguaggio che sarà a- 
dopcralo sul computer. In una mac- 
china da calcolo si ha in definitiva: 

• HARDWARE, rappresentante l'in- 
sieme di connessioni elettriche, cir- 
cuiti stampati, integrati, tastiera, vi- 
deo. periferiche, le cui caratteristiche 
l'utente difficilmente potrà modifi- 
care. 

• FIRMWARE: è l'insieme dei circui- 
ti integrati (I.C. oppure C.l.) in genere 
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a sola lettura ( ROM. EPROM. PROM ) 
contenenti l'O.S. ed il linguaggio, 
quando c'è. 

Il firmware si può definire come l'or- 
ganizzazione che gestisce le funzio- 
nalità del microprocessore. Esso, dif- 
ferentemente dall'hardware. può es- 
sere modificato facilmente dall'uten- 
te. E' noto che in alcuni sistemi, sosti- 
tuendo le ROM. è possibile far parla- 
re il computer non più in Basic, ma. 
ad esempio, in Pascal. 

Altri esempi di firmware sono rap- 
presentati da integrati venduti da al- 
cune ditte, da inserire negli zoccoli 
vuoti per I.C. presenti sul circuito 
stampato, per aumentare le capacità 
di calcolo del computer (calcolo ma- 
triciale. word processor, eccetera). 

• SOFTWARE: è quello interamente 
gestibile dall’utente ed è rappresenta- 
to dalle RAM che sono particolari 
I.C. in cui è possibile sia scrivere che 
leggere informazioni. Quando, ad e- 
sempio. facciamo girare un program- 
ma scrìtto in Basic, in effetti è il pro- 
gramma LM scritto su firmware che 
interpreta ciò che abbiamo digitato 
sulla tastiera o introdotto da disco 
piuttosto che da nastro, ed impone al 
microprocessore l'elaborazione dei 
dati tali da soddisfare le richieste del- 
l'utente. Ecco perchè quando si sce- 
glie un computer, può essere utile sa- 
pere il"peso" del linguaggio adopera- 
to e del Sistema Operativo. Grosso 
modo un Basic da 8K è di certo meno 
sofisticato di uno da I6K. ma più di 
uno da 4K. Anche il "peso" dell'O.S. 
può dare un'idea della complessità, e 
quindi della capacità di elaborazio- 
ne. di un Sistema Operativo. 

Ciò premesso ci occuperemo della 
organizzazione e di alcune istruzioni 
che un microprocessore, ed esatta- 
mente il 6501 è capace di eseguire 

Che cosa è un 
numero? 

Prima di procedere è opportuno 
soffermarci sul concetto di "numero" 
dal momento che abbiamo anticipa- 
to alcuni concetti di base. Dicevamo 
prima, che il codice riconosciuto dal 
computerèun insieme di otto cifre in 
base 1 vale a dire che gli unici valori 
emessi e accettati dal microprocesso- 


re sono lo zero e l'uno, che vengono 
chiamati anche livelli logici perchè 
corrispondono ad una particolare si- 
tuazione elettronica di presenza ( I ) 
oppure di assenza (0) di tensione 
Questi otto stali o livelli logici, com- 
binandosi diversamente tra di loro, 
possono dare luogo a ben 256 combi- 
nazioni differenti. 

Per quanto riguarda il computer, è 
necessario chiarire che ogni singolo 
valore binario (zero o uno) viene 
chiamato "bit", mentre un insieme di 
otto bit viene definito “byte" o "paro- 
la". Nel nostro caso specifico, il 6502 
è un microprocessore ad 8 bit. Ciò si- 
gnifica appunto che questo è in gra- 
do di trattare simultaneamente fino 
ad otto cifre binarie, e che una sua 
"parola" è composta da otto bit: ogni 
locazione di memoria può contenere 
un numero compreso tra zero e 
255. 

Ciò è giustificato dal latto che un 
microprocessore ad otto bit (come, 
appunto, quelli montati sui compu- 
ter Commodore), possono “trattare" 
otto simboli per volta che. ciascuno, 
possono valere solo “1" oppure "0" 

Vediamo di chiarire questo impor- 
tante concetto, che rappresenta il 
fondamento deH'informatica. 

Noi siamo abituati già alla notazio- 
ne binaria (-^due simboli soltanto) 
anche senza che ce ne rendiamo con- 
to: Consideriamo, infatti, gli indica- 
tori lampeggianti di direzione di una 
qualsiasi autovettura ed esaminiamo 
i vari casi che possono presentarsi: 

• Nessuna delle due lampadine lam- 
peggia. Ciò significa che l'auto proce- 
de diritta (oppure è parcheggiata!) e 
l'automobilista non ha intenzione 
di svoltare. 

• Lampeggia il solo indicatore destro 
Ciò significa che tra breve l'utomobi- 
le girerà a destra. 

• Lampeggia l'indicatore sinistro. 
L'auto svolterà a sinistra. 

• Lampeggiano entrambe le lampa- 
dine. L'automobile è ferma in corsia 
di emergenza. 

Badate bene che con sole due lam- 
padine (destra e sinistra) è possibile 
generare quattro significati diversi 

Il numero quattro deriva dal nume- 
ro due (le possibilità, cioè lo stato di 


"acceso" oppure "spento") elevato al 
quadrato (il numero delle lampadi- 

Schematizzando l'esempio, le quat- 
tro possibilità possono esser indicate 
nel modo seguente: 


Lampadine 

Sinis. Ues. 

a o 

U 1 

1 U 

i 1 


Nel caso di un semaforo, che è for- 
malo da tre lampade, sarebbe possi- 
bile generare un numero di due (stati 
possibili) elevato alla terza (numero 
di lampade), cioè otto simboli diver- 
si. Schematizzando come prima, si 
ha: 



Come si può notare, si possono in- 
dividuare. nel traffico stradale, un 
numero inferiore di stati possibili. 

Se invece di lampadine parliamo di 
bit e. invece di acceso e spento, par- 
liamo di "uni" e di "zeri", il discorso 
di base sul Linguaggio Macchina 
non costituisce più alcun problema. 

Dunque, riepilogando: Avendo a 
disposizione otto bit (lampadine) o- 
gnuno dei quali può essere in uno so- 
lo di due stati (1. 0 oppure acceso o 
spento, oppure ON. OFF eccetera), 
quante possibili combinazioni è pos- 
sibile ottenere?: 

2 elevato allottava potenza- 256 
simboli diversi, proprio come abbia- 
li "primo" è costituito da un gruppo 
di otto zeri (IXXXXXXX)). l'ultimo da un 
insieme di otto "uni" (111111 II). 

Il calcolatore, dunque, "ragiona" 
solo con gli zeri e gli uni (che brutti 
termini!). Sarebbe un guaio se anche 
noi dovessimo scrivere un program- 
ma ricorrendo a due soli simboli. 
Fortunatamente c'è un sistema che 
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consente di trasformare un qualsiasi 
numero binario (formato normal- 
mente da otto bit) nel corrispondente 
decimale. Esempio: A quale numero 
decimale corrisponde il numero bi- 
nario di otto bit 10010101? 

Si considerano i simboli ad uno ad 
uno. Questi rappresentano resisten- 
za" (se è eguale ad uno) della potenza 
di due corrispondente. In caso con- 
trario (=0) ne denotano l'assenza. 
Spieghiamoci meglio scrivendo il 
numero binario in verticale anziché 
ri orizzontale. Vale a dire, invece di 


sponde, dunque, al decimale: 

128+ 16+4+ 1-149 
La notazione binaria è quindi co- 
stituita da due soli simboli (0/1): 
quella binaria da dieci (0. 1. 2. 3. 4. 5. 
6. 7. 8. 9). E quella esadecimale. di cui 
si sente spesso parlare? Da ben sedici 
simboli Questi sono i "soliti" dieci 
della decimale, più le prime sei lette- 
re dell'alfabeto A. R. C. D. E. F 
Per ciò che riguarda la corrispon- 
denza tra le due notazioni, si tenga 
presente che per i valori tra zero e no- 
ve. la decimale e la esadecimale sono 


I00l0l0l.sc 

risiamolo: 

perfettamente identiche. Le cose 


corrispondente 

potenza di 

due ESISTE 




" NON " 



“ * 

” NON " 



.. 

" ESISTE 




” NON " 




" ESISTE 




” NON " 

i “ 


.. >• 

" ESISTE 

Che cosa. 

però, intendiamo con il 

cambiano da 10 


termine corrispondente ? 

Decim 


Semplicemente il "posto" che quel 

3 


simbolo occupa nella numerazione 



all interno del byte (insieme costituì- 



to dagli otto 

!ut). Il primo simbolo a 



sinistra è il settimo, il secondo è il se- 



sto e cosi vi 

. fino al primo a destra 



che rappresenta il bit di "peso” 


E 

zero. 


15 

F 

Peso 

Dal . Esiste 

Calcola 



3 C0/13 Csi/no) 

cpot.ei 



1 si 

et7 

ìee 

6 

0 no 

0 



0 no 

0 



1 si 

eri 



0 no 

0 



1 si 

ara 



0 no 

0 



1 si 

era 

ì 


Si ricorda che il numero due (e qual- 
siasi altro numero) elevato alla po- 
tenza zero fornisce come risultato "I" 
e non zero come potrebbe sembrare a 
prima vista. 

Si noti, inoltre, che il "peso", cioè le 
posizioni, sono numerate da "7" a "0" 
e non da "8" a "I": anche zero è 
un numero! 

Il numero binario 10010101 corri- 


E per i n 
intuitivo 


Per esercizio, "inventatevi" un nu- 
mero compreso tra zero e 255 e "tra- 
ducetelo" in binario e in esadecima- 
le. In seguito utilizzate il programma 
riportato in queste pagine per con- 
trollarne la corretta conversione. 

ao REM PROURAMMA 0 

ino REM CONUEKblUNE 
110 REO UO DECI MOLE 
1S0 REO « BINARIO 
130 REM EU ESADECIMALE 

1B0 1NPU1 "NUMERO UEU I MALE (0-£ 


IF ND> 2SS OR N 
UNO) TMEN 150 
FOR 1-0 IO 7 : Y 


[•'ESADECIMALE " 


£60 IF X<10 THEN PRINTX; : PRINT : 
£70 PKINICHRSt bb*X) ; BRINI ; KUN 

Esistono anche computer più evo- 
luti. in grado di trattare simultanea- 
mente fino a 16 o anche fino a 32 bit 
Ma la notevole velocità è pagata dal- 
la maggiore complessità delle istru- 

Tutto sommato, quindi, la soluzio- 
ne degli 8 bit resta forse una delle più 
valide per l'utilizzo non professiona- 
le. anche se non proprio dilettan- 

Continuiamo ora il discorso sul 
Linguaggio Macchina, trattando la 
corrispondenza esistente tra nume- 
razione decimale e binaria. Per e- 
sempio. per noi il numero 183 signifi- 
ca un numero di oggetti pari alla 
somma di un centinaio, otto decine e 
tre unità. Volendo esprimere questo 
numero come un insieme di potenze 
di dieci, noi scriviamo: 


ri maggiori di 15? E' 183 


I*l0f 2+ 

8*10 ♦ 1 + 

3* 10 f 0 

Si ricordi che qualsiasi numero, 
tranne zero, elevato a potenza nulla, 
fornisce come risultato il numero 1 e 
non zero, come abbiamo già sottoli- 
neato. Inoltre si ricordi che 10 f n è u- 
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gualc a 10 * 10 • 10 * - 10 n volte. 
Per esempio: 

10 <4= 10*10*10*10= 10000. 

Qualsiasi numero, pertanto, può 
venir rappresentato come somma di 
potenze di dieci, decrescenti (2.1.0. 
nel nostro caso, perchè 183 è compo- 
sto di tre cifre) ciascuna moltiplicata 
per un fattore che è una delle cifre del 
numero considerato. Tale sistema di 
numerazione è stato adottato dal- 
l'uomo perchè, probabilmente, quan- 
do scoprì i numeri si servi del metodo 
più semplice di cui potesse disporre: 
le dita delle mani. 

Un calcolatore, e quindi anche un 
Commodore, ha a disposizione sol- 
tanto uno stato alto ed uno basso, a 
seconda se in un particolare punto 
del circuito vi è tensione o meno. In- 
dicando lo stato alto di tensione con 
"1” e quello basso con “0". il compu- 
ter dispone di un sistema di numera- 
zione che ha appena due simboli, c 
prende appunto il nome di Sistema 
Binario. Una cifra, in tale sistema, 
prende il nome di bit ed una quantità 
qualunque deve venire espressa co- 
me potenza di due. 

Supponiamo di avere in ingresso 
otto segnali corrispondenti ad una si- 
tuazione elenronica di questo tipo: 

0 I 0 1 1 0 I 1 

Questo valore è espresso in codice 
binario, esattamente allo stesso mo- 
do in cui noi scriviamo i consueti nu- 
meri che sono in base 10. Il “nostro" 
123 equivale in pratica a: 


Il problema si pone quando si tratta 
di memorizzare quantità decisamen- 
te grandi, anche se di uso frequente 
(dell'ordine del milione), per le quali 
c'è bisogno di decine di simboli bina- 
ri contro i sette o al massimo otto 
del decimale. 

Non è difficile accorgersi della no- 
tevole complessità di un tale sistema 
di numerazione, almeno per l'uomo, 
che è abituato a ragionare in base 10 
(chissà se avessimo avuto solo 8 dita 
cosa sarebbe successo!). 

Per ovviare a questo i nconveniente. 
dato che. al contrario, la macchina si 
trova a proprio agio, i matematici 
hanno pensato bene di dividere quel- 
la cifra cosi complessa in due parti 
(nibble) attribuendo a ciascuna di es- 
se un codice alfanumerico a seconda 
del numero indicato. 

Cosi %010l = $5 e %I01 1 = SB. do- 
ve il simbolo "%'■ indica un numero 
in notazione binaria, mentre il sim- 
bolo "$" indica la numerazione esa- 
decimale (a base 16); in questa, oltre 
ai numeri, sono utilizzate anche le 
prime sei lettere dell'alfabeto c ciò 
per sopperire alla mancanza di ade- 
guati simboli per indicare numeri su- 
periori a 10. Questo fatto, anziché 
complicare la situazione, come po- 
trebbe sembrare a prima vista, la 
semplifica, perchè accostando i due 
numeri ottenuti ($5 c SB) otteniamo 
la cifra esadecimale $SB che corri- 
sponde appunto al nostro #91 calco- 
lato prima (“#" è il simbolo della ba- 
se 10): 


l*10f 2+ 
2*10» 1 + 
3*10 f 0= 


Allo stesso modo avremo che quel- 
l'accozzaglia di uno e di zero che ab- 
biamo visto prima corrisponde ad u- 
no e ad un numero soltanto, determi- 
nabile matematicamente. Avremo: 


0*2 1 7+ 
1*2 ♦ 6+ 
0*2 f 5+ 
1*2 f 4+ 
1*2 ♦ 3+ 
0 * 2 } 2 + 


5*16 1 l + ll*16t 0-91 
I vantaggi della numerazione esa- 
decimale sono molteplici: inanzitut- 
to qualsiasi valore riconoscibile dal 
microprocessore sarà espresso con 
due soli simboli, dal momento che 
con 8 valori binari si può ottenere, ol- 
tre allo zero, il valore massimo di 255 
(decimale) corrispondete ad SFF esa- 
decimale. In secondo luogo, ma non 
meno importante, cosi facendo il 
programmatore ha sempre sottoc- 
chio la situazione interna (e quindi 
binaria) della macchina, perchè con 
un po' di allenamento non è difficile 
imparare a memoria la tabellina di 
conversione da binario (con 4 sole ci- 
fre) ad esadecimale (fino ad “F”). per 
poi fare rapidamente tutte le conver- 


sioni desiderate. Queste due caratte- 
ristiche. da sole, hanno fatto si che il 
Linguaggio Macchina assumesse co- 
me caratteristica principale l'uso di 
codici esadecimali. sottintendendo 
l'origine binaria di tale scelta. 

Si può dunque immaginare facil- 
mente che una certa quantità sarà 
rappresentata da un numero di sim- 
boli esadecimali. inferiore a quello 
decimale e a sua volta nettamente in- 
feriore al binario puro. 

Poiché la memoria di un calcolato- 
re è una successione di gruppi di otto 
bit ciascuno, noi potremo considera- 
re. per semplicità, ciascun byte come 
se fosse formato da due valori esade- 
cimali. benché, nella realtà, il valore 
sia “scritto" in binario puro. Si pre- 
senta ora un altro problema nel pro- 
getto di un calcolatore, e cioè come 
individuare, tra le tante, una certa lo- 
cazione di memoria. Ad ogni byte si 
assegna un indirizzo che altro non è 
se non un gruppo di sedici bit. 

In tale modo si possono indirizzare 
2 1 16 = 65536 locazioni di memoria. 
Con un numero inferiore di bit (ad e- 
sempio 8). si possono indirizzare so- 
lamente 2 1 8 = 256 locazioni di me- 
moria. insufficienti per un versatile 
uso di un computer. Da notare che. 
in generale, i microprocessori ad otto 
bit (6502. 8080. Z80. ccc.) trattano co- 
me dati gruppi di otto bit ma hanno 
come “indirizzi" gruppi di 16 bit 
Per poter gestire una memoria più 
grande, dato che in teoria non c'è re- 
lazione tra numero di bit di un dato e 
numero di bit di un indirizzo, si po- 
trebbero avere dati di otto bit. ma in- 
dirizzi di trentadue o comunque più 
di sedici bit. 

Come mai. quindi, non si sceglie 
questa soluzione per aumentare la 
capacità di memoria, e invece si ri- 
corre a memorie di massa, come i na- 
stri magnetici, i floppy disk o alle tec- 
niche più sofisticate, come le memo- 
rie virtuali? 

Semplicemente perchè sarebbe, in 
un primo caso, più complesso, come 
vedremo in seguito, indirizzare oltre 
il valore di 65536; in secondo luogo, 
risulterebbe necessario cambiare l'ar- 
chitettura stessa della CPU. c di con- 
seguenza. modificare la struttura dei 
linguaggi già diffusi sul mercato 
intemazionale. 
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Conversioni tra diverse 
basi numeriche 

Ritornando agli indirizzi e ai dati, 
vediamo ora di individuare un indi- 
rizzo di cui sappiamo il valore solo in 
decimale o esadecimale. 

Il problema si presenta quando si 
usano, da Basic, i comandi PEFK e 
POKE. dato che siamo costretti a for- 
nire gli argomenti dei comandi stessi 
espressi come valori decimali, men- 
tre spesso li conosciamo come valo- 
ri esadecimali. 

Poniamo per esempio di voler con- 
vertire il numero 1 1052 decimale nel 
corrispondente esadecimale (che ha 
sedici simboli), ma il ragionamento 
che seguiamo sarà simile per qualun- 
que sistema di numerazione. 

Si divide il numero in oggetto per il 
numero di simboli del sistema scelto 
c si considera il resto ed il quoziente 
intero (primo resto - 12: primo quo- 
ziente = 690). Il quoziente, se mag- 
giore o uguale a sedici, si divide nuo- 
vamente per sedici (secondo resto - 
2: secondo quoziente - 43): poiché il 
nuovo quoziente è ancora maggiore 
di sedici, si ripete il procedimento 
finché si ottiene un quoziente minore 
di sedici (terzo resto - 1 1 : terzo quo- 

II numero esadecimale desiderato é 
formato dai tre resti ottenuti e dall'ul- 
timo quoziente in ordine inverso: 2. 

Infine, sostituendo tali valori con i 
simboli corrispondenti in csadeci- 
male. si ottiene il valore cercato: 
2B2C. 

Convertiamo ora un numero esa- 
decimale in decimale, limitandoci a 
trattare solamente i numeri compresi 
tra OOOOe FFFF. La prima cifra, delle 
quattro, rappresenta il numero mol- 
tiplicato per 16 3; la seconda per 
16 2. poi 16 I e quindi 16 0: per- 
tanto. volendo convertire 2B2C si 

2*16 1 34 
B*16t 2+ 

2*16 1 1 + 

C*16f 0 

convertendo i numeri "B" e "C" e- 
sadecimali in decimale otteniamo: 
2*16 1 3+ 


11*16 1 2+ 
2*l6f 1 + 
12*16 f0 = 


Usiamo PEEK e 
POKE 

Prima di continuare é opportuno 
saper usare correttamente le istruzio- 
ni PEEK e POKE del Basic. 

Queste istruzioni consentono di 
leggere (PEEK) in tutta la memoria e 
di scrivere (POKE) un qualsiasi nu- 
mero intero, compreso tra 0 e 255. in 
qualsiasi locazione della RAM. Per 
esempio, se noi battiamo: 

PR1NT PEEK(4080) 

apparirà, in decimale, il valore del- 
la 4089ma locazione RAM. Vicever- 
sa. battendo: 

POKE 4080.151 

il valore 151 decimale sarà trascrit- 
to nella 4080ma locazione di memo- 

Da notare, però, che mentre il co- 
mando PEEK(X) si limita a leggere 
un valore e non lo modifica in nes- 
sun caso, l'istruzione POKE X.Y cer- 
ca di modificare il valore della loca- 
zione X. Possono, quindi, verificarsi 

• Cerchiamo di scrivere in una loca- 
zione ROM del Basic oppure del- 
l'O.S. Naturalmente, il dato che cer- 
chiamo di scrivere non viene scritto, 
in quanto nella ROM (Read Only 
Memory, memoria a sola lettura) 
non si può scrivere, e nessun messag- 
gio di errore appare per informarci 
delfimpossibilità di eseguire l'opera- 


• Analoga mancanza di messaggio di 
errore si verifica se l'indirizzo della 
POKE cade in una zona RAM (Ran- 
dom Access Memory, memoria ad 
accesso casuale) non esistente nella 
configurazione del sistema, ma que- 
sta evenienza è impossibile da verifi- 
carsi con il Commodore 64 dato che 
ad ogni indirizzo corrisponde un 


• L'indirizzo della POKE rappresen- 
ta una locazione RAM utilizzata dal- 
Ì O.S. e una sua modifica può "'di- 
struggere'' (non irrimediabilmente 
per la macchina, comunque) il siste- 


ma. Saremo, in questo caso, costretti 
a spegnere e poi a riaccendere il com- 
puter. perdendo, purtroppo, tutto il 
contenuto della RAM. 

• Il valore Y di POKE X.Y è negativo 
o maggiore di 255. Questo è l'unico 
caso in cui compare un messaggio di 
errore. Teniamo presente, infine, che 
se Y non è un valore intero, verrà pre- 
sa in considerazione solo la parte 


Supponiamo di non cadere in uno 
dei casi critici: come facciamo allora 
a memorizzare un numero maggiore 
di 255? Il procedimento è un po' lun- 
go. ma é l'unico che sia possibile 
adottare. 


Spacchiamo un byte 

Vogliamo memorizzare il numero 
intero 1 1052 decimale. Abbiamo già 
visto che in esadecimale corrisponde 
a 2B2C. e poiché ogni cifra csadeci- 
male rappresenta quattro bit. in tota- 
le avremo bisogno di sedici bit. Dato 
che ogni locazione di memoria con- 
tiene otto bit. noi potremo "spezzare" 
2B2C in due gruppi: 2B e 2C; il pri- 
mo. dopo averlo tradotto in decima- 
le. lo scriveremo in una locazione, il 
secondo in quella successiva. 

Riassumiamo il procedimento in 
altre parole: 

11052 decimale = 2B2C esadeci- 
male. 

Separiamo 2B da 2C 

2B esa. = 2*16 1 1 4 ll*lót 0 = 43 
dee. 

2C esa. = 2*16 ♦ 1 4 12*16 to = 
44 dee. 

Utilizziamo, per le verifiche che se- 
guono. le locazioni RAM a partire da 
49152 decimale fino 53247 (esa C000 / 
CFFF). perché tali locazioni sono 
destinate a programmi creati dall'u- 
tente e quindi non si rischia di "di- 
struggere" il sistema. 

Per tranquillizzare il lettore preci- 
seremo ciò che si intende per "distru- 
zione" del sistema. 

L'errore più "grave" che si può 
commettere è il tentativo di scrivere 
un dato in una zona ROM invece che 





RAM. Anche se questa operazione 
viene eseguita milioni di volte (e può 
capitare se si incorre in un loop chiu- 
so) nessun danno può esser provoca- 
to alla ROM nè a qualsiasi altro cir- 
cuito elettronico del computer usato. 

Se un programma L.M. è scritto 
male, oppure mal strutturato, può ca- 
pitare che i numerosi tentativi effet- 
tuati per "riprendere" il controllo del 
computer (Run/Stop e Rcstore. tasto 
di Reset eccetera) non sortiscano al- 
cun cITctto. In casi come questi l’uni- 
co modo per riprendere il lavoro con- 
siste nello spegnere c riaccendere 
l'apparecchio (e le periferiche ad es- 
so collegate) perdendo, però, il pro- 
gramma digitato. 

Ecco perchè è buona norma regi- 
strare SEMPRE un programma L.M. 
oppure Assembler PRIMA di man- 
darlo in funzione. Se non dovesse 
funzionare, non sarete costretti a ri- 
scriverlo ex-novo, ma sarà sufficiente 
ricaricarlo (da nastro o disco) ed esa- 
minarlo attentamente in modo da 
rintracciare (ed eliminare) l'errore. 

Riprendiamo il discorso interrotto 
scrivendo: 

POKE 49152.44: POKE 49153.43 

Come si può notare, del numero 
2B2C abbiamo trascritto nella prima 
locazione (49152) il valore 2C (LSB: 
Least Significant Byte = byte meno 
significativo) e nella successiva 
(49153) il 2B (MSB: Most Significant 
Byte ■= byte più significativo). anzi- 
ché al contrario, come saremmo stati 
indotti a fare istintivamente. 

Adottiamo questo procedimento 
dato che lo segue anche la CPU. Co- 
me faremo allora a sapere quale nu- 
mero è rappresentato da due locazio- 
ni di memoria successive? Natural- 
mente seguendo il ragionamento 

Traduciamo il MSB in decimale c 

10 moltiplichiamo per 256: 

2B esadecimalc « 43 decimale: 43 * 
256 = 1 1008 

Analogamente ci comportiamo per 

11 LSB. moltiplicandolo, però, per I 
(lasciandolo cioè invariato): 

2C csadecimale - 44 decimale 

In seguito eseguiamo la somma tra 

11008 + 44 = 11052 


I numeri negativi 

Come si può facilmente verificare, 
il numero più grande che si può rap- 
presentare è 65535 ed il più piccolo e 
zero, ma comunque, tutti positivi. Se 
però rinunciamo ad ottenere valori 
cosi grandi, possiamo seguire la con- 
venzione secondo cui sono da consi- 
derare positivi i valori fino al numero 
(65535- 1)/2. cioè da zero a 32767. 
mentre da 32768 a 65535 inclusi sono 
negativi e valgono esattamente il va- 
lore considerato meno 32767. 

Per esempio, il numero 52768 corri- 
sponderà con questa convenzione 

52768 = -(52768-32767) = -20001 

In questo modo possiamo rappre- 
sentare lutti i numeri interi negativi c 
positivi compresi fra -32768 c +32767. 
Ecco spiegato, dunque, perchè certi 
computer non molto sofisticati (ed 
anche i Commodore quando si usa- 
no variabili intere del tipo A%) tratta- 
no solamente quei numeri interi: con 
due byte adiacenti non è possibile su- 
perare l'intervallo suddetto. 

Ricapitoliamo dunque i concetti e- 
spressi finora: 

• II calcolatore ragiona solo in bina- 
rio puro, tratta cioè solo gruppi di ot- 
to stati di tensione elettrica alia volta, 
alta o bassa, detti BIT. 

• Per semplicità il dato formato da ot- 
to bit (detto parola o byte ) viene spez- 
zato in due da quattro bit (detti cia- 
scuno Nibble) e tradotto in esadeci- 
male. al solo scopo di rendere la vita 
più semplice al programmatore. 

• Per semplificare ancor più la stesu- 
ra di un programma in Linguaggio 
Macchina si ricorre spesso ad un lin- 
guaggio detto Assembler che. utiliz- 
zando gruppi di lettere derivati dalle 
iniziali delle parole inglesi che indi- 
cano la funzione dell'istruzione, ed 
incolonnati uno dopo l'altro, consen- 
te una relativa facilità ncll'individua- 
re eventuali errori o nell'apportare 
modifiche. 

Assembler: chi era 
costui? 

Come si vedrà meglio in seguito, 
nel linguaggio Assembler non è ne- 
cessario ricordare a memoria tutte le 
istruzioni del 6502 sotto forma di 


coppie di valori esadecimali. nè tan- 
tomeno indicare volta per volta certe 
locazioni con l'indirizzo in esadeci- 
male. Dobbiamo ricordare, comun- 
que. che ancora più che nel caso del 
Basic, non esiste un Assembler uni- 
versale. ma vi sono in commercio di- 
versi tipi di Assemblatori che differi- 
scono l'uno dall’altro in alcuni parti- 

Tali programmi permettono di 
compilare (tradurre da linguaggio m- 
nemonico in Linguaggio Macchina) 
in Assembler, ma non sono assoluta- 
mente indispensabili per seguire i 
programmi presentati via via in que- 

Potrà comunque essere utilissimo 
quale compendio per i lettori che 
vorranno stendere programmi per 
conto proprio o per scrivere quei pro- 
grammi pubblicati da altre riviste (c- 
ventualità rara, molto rara...) che non 
riportano anche il cosiddetto codice 
oggetto, cioè il programma scritto di- 
rettamente in Linguaggio Macchina. 

Innanzitutto è opportuno conosce- 
re il sistema secondo il quale è possi- 
bile programmare il nostro compu- 
ter. Per quanto riguarda il Linguag- 
gio Macchina vero e proprio, l'unico 
metodo di programmazione consiste 
nell'inserire in memoria (con delle 
POKE) i codici e gli operandi, rispet- 
tando un preciso ordine stabilito pre- 
cedentemente su di un supporto- 
cartaceo. Assai più comodo risulta 
essere l'impiego di speciali program- 
mi assemblatori e disassemblatori, di 
cui parlavamo prima, denominati 
"MONITOR" (Machine Language 
Monitor, per esteso), che evitano il 
fastidio di convertire i codici mne- 
monici in numeri e di pokarli in 
memoria. 

Il primo programma! 

L'aspetto più curioso, se vogliamo, 
del discorso, è il fatto che dopo aver 
inserito in memoria dei semplici nu- 
meri. il microprocessore distingua 
tra di loro quali corrispondono ad i- 
struzioni c quali sono invece operan- 
di. da considerarsi esclusivamente 
come numeri. Consideriamo il se- 
guente esempio: 

LDA #S00 
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ceoi 


60130 DATA 07B, 501 . £00. 176.235 
60140 DATA 165,076,041,007,133 
60150 DATA 247,165,076,074,074 
60160 DATA 041,254, 166, IBS, 235 
60170 DATA 193,056,229,247,133 
60160 DATA 247, IBS, 236. 193.024 
60190 DATA 101,066,133,246,165 
60200 DATA 067.041,248,166.165 
60210 DATA 067,041,007.170,024 
60220 DATA 096 . 032 , 036 . 159 . 032 
60230 DATA 094,197,173,236,159 
60240 DATA 206 . 00B , 1B9 , 227 . 193 
60250 DATA 049,247,056,206,001 
60260 DATA 024,008,032,109,197 
60270 DATA 040,096,032,003,159 
60280 DATA 169 , 00B , 032 , 071 , 171 
60290 DATA 169,199,133,251,169 
60300 DATA 000.133,067,133,068 
60310 DATA 133,079,162,007,134 
60320 DATA 253,165,251,133,076 
60330 DATA 032,111,159,102,252 
60340 DATA 198.078,196,253,208 
60350 DATA 245,102,252,165,252 
60360 DATA 009.128,032,071,171 
60370 DATA 165,145,201,127,240 
60360 DATA 032, 230, 0B7, 206, 002 
60390 DATA 230 , 0BB , 165 , 086 . 240 
60400 DATA 212,165,067,201,064 
60410 DATA 206,206,169.013.032 
60420 DATA 071,171.165.251.056 
60430 DATA 233,007.133,251,201 
60440 DATA 252.206.162.169.015 
60450 DATA 032 . 210 , 25S . 169 , 013 
60460 DATA 032,210,255.076,028 
60470 DATA 159.000 


Mappa della memoria 

Conf iQurazione della memoria da SC0OO a 
4CKFF dopo il caricamento delle routine 
prefiche, della modifica per la disat- 
tivazione del tasto nestore, dei coman- 
di per il caricamento e reqistrazione 
della pagina qrafira. di CHAR/UCHAR e di 


C2D2 

C2DF 

C2EC 

C3FB 

C3FD 

CH1B 

CHIC 

CH26 

CH27 

C7AB 

C7AC 

C7FE 

C7FF 

CBB3 

CBB4 

C369 

C970 

CAS2 

CAS3 

CA72 

CA73 

CBFF 

CFE7 

CFFB 

CFFF 


ROUT. GRAF . ORIGINALI 


DISABIL. TASTO RESTORE 


ROUT. GRAF. ORIGINALI 


TABELLA INDIRIZZI 


ULTERIORE SPAZIO PER INDIRIZZI 


ROUT. GRAF. ORIGINALI 


TABELLA DELLE PAROLE 


SPAZIO DISPONIBILE PER PAROLE 
0 PER I DATI DEGLI SPRITE 


ROUT. GRLOAD/GRSAUE/ECC . 


ROUT. CHAR/UCHAR 


ROUT. INU 


SPAZIO DISPONIBILE PER SPRITE 


nEnORIA DI SCHERMO HIRES 


PUNTATORI DEGLI SPRITES HIRES 
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STA $0400 
RTS 


Convertendolo in codici macchina 
otteniamo: 

A9 00 
8D00 04 
60 


Se volessimo rendere esecutivo il 
programma (il cui scopo è quello di 
farcomparire una chiocciolina in al- 
to a sinistra sullo schermo), dovrem- 
mo innanzitutto decidere in quale 
zona di memoria vogliamo allocare i 
dati rappresentanti il programma 
LM. 

10 KEn programma 1 
80 PRINTCHRSC 147) 

30 prini "stampo uno chioccioli 



CHIOCCIOLINO SULLO SCHERNO 


INO .N ESO DOTI nNEnON. 


49158 C000 09 00 LDOln 0 
49154 C008 80 00 04 STO 1024 

491S7 C00S 60 RTS 


Questo concetto è molto importan- 
te. ed è alla base di tutto il discorso. In 
Linguaggio Macchina non è il com- 
puter (come nel Basic) ad assegnare 
automaticamente l'area di memoria 
che ritiene più opportuna, ma siamo 
noi che dobbiamo decidere, in base 
alle nostre esigenze, dove "sistemare" 
il programma. 

In fase sperimentale abbiamo già 
visto che è consigliabile utilizzare la 
memoria RAM compresa fra 49152 
(SC000) e 53247 (SCFFF) decimali. 
Questa zona, di 4 Kbyte. è molto co- 
moda. a patto che non si usi un Mo- 
nitor che risieda in quelle locazioni. 


Comunque sia. qualsiasi parte di me- 
moria è programmabile dall'utente 
(tranne ovviamente la ROM). 

Un programma Basic che consenta 
di scrivere le nostre routine in lin- 
guaggio macchina si può presentare, 
ad esempio, col seguente aspetto: 

10 Ktn programma e 

80 PK I N1CHRSI 147 ) 

30 PRINI'SIANPA UN CARATTERE" 
40 PRINI'IN UN PUNTO UUALSIA91 


CARATTERE SULLO SCHERMO 


IND.N ESA DATI MNEMON. 


49198 C000 A9 A0 LDAIM 160 
49154 C008 80 AS 04 SIA 1189 

49157 C005 60 RTS 


Una volta eseguito il nostro pro- 
gramma "caricatore", la routine t 
pronta per essere utilizzata. A questo 
punto non ci resta che digitare RUN 
c. quando compare il Ready. SYS 
49152: il nostro primo programma in 
Linguaggio Macchina verrà esegui- 
to! 

Prima ancora di commentare ciò 
che i successo aU'intemo del compu- 
ter. osserviamo che l'indirizzo di par- 
tenza specificato dopo la SYS è deter- 
minante ai fini dell'esecuzione del 
programma stesso. E' opportuno sa- 
pere che la CPU i microprogramma- 
ta (via hardware) in modo tale che ri- 
conosca il primo valore che incontra 
come un'istruzione e non come un 
operando. 

Se per caso dovesse incontrare un 
codice inesistente nel set a sua dispo- 
sizione. il sistema si "impanerebbe", 
rendendo necessario lo spegnimento 
del computer e la conseguente perdi- 


ta del programma. 

C’è da ricordare, inoltre, che ogni i- 
struzione richiede un diverso nume- 
ro di operandi: vi sono casi in cui l'i- 
struzione non richiede altre specifi- 
cazioni (istruzioni ad un byte), casi 
in cui viene utilizzato un solo ope- 
rando (istruzione a due bytes) e casi 
in cui servono due operandi (istru- 
zioni a tre bytes). 

Ma prima di procedere in questa 
direzione, è bene dare un'occhiata 
più da vicino al sistema in cui vengo- 
no gestiti i dati all'interno del com- 
puter. 

I registri della CPU 

La CPU contiene al suo interno al- 
cuni registri (vale a dire: locazioni di 
memoria "speciali") che consentono 
sia di effettuare operazioni aritmeti- 
che di vario tipo, sia di rendere possi- 
bile il funzionamento dello stesso 
circuito integrato. Sicuramente non 
avrebbero alcun significato parole 
come "programma" e "memoria" se 
non esistesse un particolare registro 
chiamato "Program Counter" (con- 
tatore di programma. PC per gli 

Il PC. come dice il termine stesso, 
provvede a tenere il conto delle loca- 
zioni di memoria nelle quali risiede 
il programma LM che sta girando. 
Automaticamente e regolarmente, 
grazie ad un preciso timer interno, il 
PC si incrementa a seconda del nu- 
mero di byte occupati dal codice e dal 
suo eventuale operando. Nel caso del 
nostro mini-programmino. dopo il 
comando Basic SYS 49152 il PC sarà 
caricato con il valore 49152. 

La prima istruzione è A9 00, a due 
bytes. Quindi, dopo averla eseguita, il 
PC si autoincrementcrà automatica- 
mente di due unità, divenendo ugua- 
le a 49154. locazione a partire dalla 
quale vi è memorizzata, guarda caso, 
la successiva istruzione. 8D 00 04, a 

Questa volta l'incremento sarà u- 
guale a tre unità, ed il PC conterrà il 
valore 49157. corrispondente all' i- 
struzione 60 (RTS); a questo punto 
l'esecuzione del sottoprogramma ter- 
mina. e dal momento che la chiama- 
ta era stata effettuata dal Basic, l'in- 
terprete stesso riprenderà in mano 
la situazione. 
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Il procedimento effettivo che viene 
svolto aU'intemo del microprocesso- 
re in realtà è molto più complesso, 
prevedendo precise temporizzazioni 
che variano da istruzione a istruzio- 
ne. ma per il momento può essere 
sufficiente quanto è stato detto. 

Non sarà sfuggito ai lettori più at- 
tenti il fatto che il PC deve essere in 
grado di indirizzare 65S3S bytes, 
mentre un registro (che altro non è se 
non una normale locazione di me- 
moria fisicamente residente nella 
CPU) può arrivare ad un massimo di 
256 (con soli 8 bit...). Anche in questo 
caso è la matematica che fornisce 
la soluzione. 

In realtà esistono due PC. rispetti- 
vamente il Program Counter Low 
(PCL) e il Program Counter High 
(PCH), Per ottenere indirizzamenti 
che giungano fino ai 64 Kbytes di me- 
moria, la CPU provvede a dividere 
questo numero in due parti che non 
superino come valore massimo il 
255. La formuletta in questione è la 
seguente: PC - „ PCL + 256*PCH 

Un po' come la faccenda dei nib- 
blcs, la comodità è tutta a vantaggio 
del codice esadecimale. in quanto 
basta accostare i due valori per otte- 
nere l'indirizzo completo; supponen- 
do che PCL contenga $02 e che PCH 
sia uguale a SCO, il PC risulterà esse- 
re SC002. 

Il fatto che abbiamo indicato in tut- 
ti questi esempi prima il byte basso 
(Low Byte o LB) e poi quello alto 
(High Byte o HB). come abbiamo già 
avuto modo di osservare, non è stato 
casuale, anzi! In tutti i casi in cui si ri- 
chieda un riferimento per qualsiasi 
locazione di memoria, è questo lo 
standard adottato dalla CPU, che 
prevede sempre di seguire rigida- 
mente la successione indicata. Infat- 
ti, volendo controllare il banale e- 
sempio presentato poco fa, l'istruzio- 
ne STA $0400 è stata codificata come 
8D 00 04. con evidente inversione di 
posizione dell’operando. 

Esula dagli scopi di questo corso 
fornire la motivazione di questa scel- 
ta, che naturalmente non è casuale, 
ma implica notevoli vantaggi. 

Tre registri basilari 

Oltre al PC vi sono tre registri sin- 
goli. che vengono chiamati '‘A“. “X" e 


“Y”. La loro caratteristica consiste 
nel fatto che. oltre alla notevole rapi- 
dità con la quale vengono gestiti dal- 
la CPU (in media quasi doppia di 
qualsiasi memoria esterna), esistono 
particolari istruzioni che consentono 
di ''giocare" con loro. A parte gli 
scherzi, di questi tre il più importante 
è di gran lunga il registro A(Accumu- 
latore). E‘ questo il registro che con- 
sente di accedere direttamente alla 
ALU (Aritmetic Logic Unit), unità di 
calcolo del microprocessore. E' in 
questo registro che. prima del calco- 
lo. risiede uno dei due addendi c. do- 
po l'operazione, il risultato dell'addi- 
zione o della sottrazione effettuata 
(uniche operazioni aritmetiche pre- 
viste dal 6510). 

Per quanto riguarda la comunicazio- 
ne con l'esterno del microprocessore, 
vi è il Bus Dati, vero e proprio "cana- 
le elettronico" dentro al quale passa- 
no i dati sia in ingresso che in 

In seguito ad un'istruzione del tipo 
LDA $0400. ad esempio, il Bus Dati 
conterrà innanzitutto la richiesta di 
accesso alla locazione $0400. La ri- 
sposta che otterrà sarà immagazzi- 
nata nell'accumulatore, pronta per 
successive elaborazioni. 

A questo punto pensiamo sia con- 
veniente fermarsi per meditare un 
po' su questa notevole massa di con- 
cetti. Ma per non lasciare a bocca a- 
sciutta chi ci ha seguito sino a questo 
punto, proponiamo alcuni program- 
mini che vedremo di commentare 
assieme. 

Dati o istruzioni? 

Innanzitutto è bene conoscere al- 
cune istruzioni basilari che facilite- 
ranno la comprensione degli stessi. 
L'istruzione Basic che permette di 
scrivere un valore, compreso tra zero 
e 255. direttamente in una locazione 
RAM. è. come abbiamo già visto. 
POKE. La stessa istruzione, scritta 
però in Linguaggio Macchina che u- 
tilizza la notazione esadecimale. è 
8D. Tale simbolo deve essere seguito, 
nella memoria del calcolatore, da 
due byte indicanti rispettivamente la 
parte bassa (LSB) e la parte alta 
(MSB) dell'indirizzo in cui si deside- 
ra scrivere il contenuto dell'accumu- 


Quanto asserito può lasciare per- 
plesso il lettore: tutti gli statements 
del linguaggio Basic sono in effetti 
parole inglesi o parti di esse, di im- 
mediata interpretazione. Ci si deve 
però convincere che un microproces- 
sore "parla" un linguaggio tutto suo, 
formato esclusivamente da 0 ed 1, e 
pertanto 8D. rappresentante la tra- 
duzione in esa che per noi non signi- 
fica assolutamente nulla è per esso 
un preciso comando. In altre parole è 
solo questione di simboli: ognuno 
parla la propria lingua. 

Un'altra istruzione frequentissima 
nei programmi in L.M. è A9. Per e- 
sempio, A9 A0 viene interpretata dal 
6502 nel modo seguente: 

"Carica l'accumulatore col conte- 
nuto del byte che segue immediata- 
mente l'istruzione stessa (cioè A0)'\ 

Quando il micro avrà eseguito l'i- 
struzione (di due byte, a differenza di 
8D. istruzione a tre byte), all'interno 
dell'accumulatore sarà presente, nel 
caso specifico, il valore A0. Conside- 
riamo ora il seguente programma: 
A9 A0 8D A5 04 60 

Supponiamo di caricarlo in memo- 
ria utilizzando un qualsiasi Monitor 
oppure il programma Basic che 
proponiamo: 

10 READ X: IF X = -I THEN 
END 

20 POKE 49152+I.X 
301 = 1+1 
40 GOTO 10 

50 DATA 169.160,141. 165.004.0%,- 1 

Dopo aver digitato SYS 49152, ver- 
rà eseguito il programma in L.M. la 
cui prima istruzione è rappresentata 
dal contenuto di 49 1 52 ($C000). e cioè 
A9 (traduzione di 169). 

Il 6502 stabilisce, proprio in base al- 
l'ordine da noi impartito, che in 
$C000 vi è un'istruzione e non un da- 
to. ed esegue l'elaborazione del pro- 
gramma partendo da tale unico pre- 
supposto. Il micro. da parte sua, sa 
che A9 è un'istruzione a due byte, la 
esegue come prima detto e subito do- 
po esamina il byte-istruzione succes- 
sivo a quello contenente A0. che è 
$C002 (in cui è 8D). In quest'ultimo 
caso l'istruzione è a tre byte. Dopo a- 
verla eseguita, il 6502 incontrerà $60. 
che significa: "Ritorna dalla subrou- 
tine". Per motivi che non stiamo qui a 





specificare, quando viene incontrata 
l'istruzione 60 senza che precedente- 
mente sia stata data l'istmzione 
"Jump to Subroutine", (come nel no- 
stro caso) si ritornerà al Basic. 

Che cosa succede impartendo il co- 
mando SYS 49152 ? 

• A9 A0. Nell'accumulatore viene tra- 
scritto il valore AO. 

• 8D A5 04. 11 valore dell'accumulato- 
re (cioè AO) viene depositato nell'in- 
dirizzo $0402 appartenente alla me- 
moria di schermo: apparirà appunto 
il simbolo corrispondente ad AO. 

• 60. Si ritorna al Basic e appare il 
consueto READY. 

Notate che il 6502 stabilisce auto- 
maticamente se un'istruzione è a tre. 
due oppure un solo byte in quanto al 
suo interno è presente un decodifica- 
tore indicante il corretto procedi- 
mento da seguire a seconda della i- 
struzione incontrata. 

Per insistere su quanto detto, digi- 
tiamo ora (sbagliando con intenzio- 
ne) SYS 49153 (invece di SYS 49152) 
e cerchiamo di capire che cosa 

• AO 8D. Dato che ordiniamo di par- 
tire non più da $0000, ma da SC001. 
il 6502 stabilisce che in tale locazione 
vi è la prima istruzione da eseguire, il 
cui significato è completamente di- 
verso da A9 A0 vista nel precedente c- 
sempio. Si ricorda che A0 8D signifi- 
ca: carica il registro Y col valore 
8D. 

• A5 04. Carica nell'accumulatore il 
valore che ora è presente nella loca- 
zione $04 della pagina zero, cioè in 
$0004. 

• 60. Ritorna al Basic. 

Benché non vi sia nulla di errato 
nella logica del programma cosi ese- 
guito. non si verifica nulla di partico- 
lare. nè tantomeno viene stampato 
sullo schermo un simbolo come nel 
primo caso esaminato. 

Digitiamo ora SYS 49154 dimo- 
strando nuovamente la notevole im- 
portanza del primo indirizzo: 

• 8D A5 04. Verrà trasferito, nella lo- 
cazione $04A5 dello schermo, il con- 
tenuto dell'accumulatore presente in 
quel particolare momento dell'ela- 
borazione. Tale contenuto può essere 
diverso da quello da noi impostato 
prima, ed esattamente è quello che il 
computer si ritrova dopo aver esegui- 


to la routine di interpretazione del 
comando SYS 49154. 

• 60. Si ritorna al Basic come prima. 

Anche digitando SYS 49155 non 
avviene nulla di particolare. Batten- 
do invece SYS 49156. il 6502 cerca di 
eseguire l'istruzione allocata in 
SC004. ma poiché $04. a differenza 
delle precedenti istruzioni, non esiste 
nel set delle 151 istruzioni del micro- 
processore. il 6502. molto probabil- 
mente. perde il controllo e non riu- 
sciamo più a ripristinare il sistema se 
non spegnendo e riaccendendo l'ap- 
parecchio. 

Quest'ultimo caso, come del resto i 
precedenti, dimostra che è di fonda- 
mentale importanza indicare con 
precisione l'indirizzo di partenza del 
programma in L.M. 

Sbagliando indirizzo si ha. nel più 
fortunato, e purtroppo raro, dei casi, 
l'esecuzione di un programma diver- 
so dalle nostre aspettative e, più spes- 
so, la "distruzione'' del sistema. 

Prime considerazioni 

Si potrebbe obiettare che il medesi- 
mo risultato ottenuto grazie al pro- 
gramma appena esaminato si poteva 
ottenere semplicemente mediante il 
Basic come, ad esempio: 

10 POKE 1189.160 


Eseguendo il programma si può 
nettamente seguire il formarsi dei 
1000 caratteri "A”. 

Proviamo ora a caricare il pro- 
gramma in L.M. che segue a partire 
dalla locazione 826 (=SQ33A), che è 
utilizzata solo durante le operazioni 
di caricamento da cassetta. 



see DATA 08. 


N CARATTERE SULL 


INTERO SCHERMO 


Ciò è vero, ma c'è da fare una prima 
considerazione: per fare apparire in 
L.M. un simbolo sullo schermo ab- 
biamo utilizzato solamente 6 byte. 
Col Basic, invece, occuperemmo ben 
10 byte, senza contare che si è dovuto 
usare l'interprete del Basic impiegan- 
do molto tempo. La sostanziale diffe- 
renza fra i due metodi si nota quando 
si vorrà riempire tutto lo schermo 
con il carattere desiderato. Con il Ba- 
sic scriveremmo, ad esempio: 

10 A=1 
20 B= 1000 

30 PRJNT CHR$(147) 

40FOR l = A TO B 
50 PRINTA" 

60NEXT 
70 END 


IN0.N ESA DATI MNEflON . 



AS 01 

BD se 







Esaminiamo, una alla volta, le t- 
struzioni contenute: 

PC = $033A: A9 04. Nell'accumulato- 
re viene scritto il numero S04 (in ef- 
fetti viene scritto il numero binario 
puro 0000 0100 e non ripeteremo più 
questo concetto). 

PC = $033C: 8D 52 03. Il valore ora 
presente nell'accumulatore ($04) vie- 
ne riportato così come è nella loca- 
zione $0352. Attenzione che nell'ac- 
cumulatore è ancora presente $04. 

PC = $033F: A9 00. Nell'accumulato- 
re viene ora scritto $00 cancellando il 
precedente $04; naturalmente ciòchc 
è stato scritto precedentemente in 
$0352 non viene modificato. 

PC =$0341: 8D 51 03. Analoga all'i- 
struzione $033C. 

PC =$0344: A9 00. Vedi istruzione 
$033F. 

PC = $0346: 8D 56 03. Vedi istruzione 
S033C 

PC = $0349: A9 D8. Vedi istruzione 
$033A. 

PC = 5034B: 8D 57 03. Vedi istruzione 
$033C 

PC = $034E: A9 FF. Vedi istruzione 
$033A. 

PC=$0350: 8D xx xx. I due gruppi di 
xx stanno a significare che possiamo 
scrivere qualsiasi valore esadecima- 
le; infatti, quando in seguito faremo 
partire il programma, le istruzioni lo- 
cate in $033C e $0341 provvederanno 
a scrivere la parte alta e bassa dell'in- 
dirizzo; a questo punto dell'esecuzio- 
ne del programma, appare in alto a 
sinistra la vocale maiuscola "A", che 
vogliamo trascrivere anche nella se- 
conda posizione, terza, eccetera, fino 
a riempire tutto lo schermo. Dobbia- 
mo pertanto fare in modo di imparti- 
re l'istruzione 8D 01 04 e poi 8D 02 
04... fino a 8D FF 07. Per evitare di 
scrivere mille istruzioni (quante sono 
le celle dello schermo) utilizziamo 
un loop (o iterazione) allo stesso mo- 
do del programma Basic. 


PC =$0353: A9 OC. Vedi istruzione 
$033A. 

PC =$0355: 8D xx xx. Vedi istruzione 
$0350 (si occupa della memoria colo- 
re allo stesso modo della memoria 
schermo). 

PC =$0358: EE 51 03. Questa istru- 
zione ($EE) aumenta di una unità il 
contenuto della locazionne il cui in- 
dirizzo è $0356: da $00 passa a $01. 
oppure, quando sarà contenuto A8, 
passerà ad A9 oppure (importante) 
da $FF a $00. 

PC=$035B: EE 5603. Vedi istruzione 
$0358 (si occupa sempre dell'incre- 
mento. ma del "puntatore" alla me- 
moria colore). 

PC = $035E: DO EE. L'istruzione $D0 
è una istruzione a due byte che fa 
parte delle cosiddette istruzioni di 
"BRANCH" (salto condizionato). 
Arrivati a questo punto, il prosegui- 
mento dell'elaborazione dipende dal 
risultato dell'ultima operazione ef- 
fettuata. 

Nel caso specifico, se EE 56 03 for- 
nisce un valore uguale a $00. l'istru- 
zione $D0 viene ignorata ed il pro- 
gramma prosegue con l'istruzione 
successiva ($0360). In caso contrario 
la CPU legge il primo bit del secondo 
byte dell'istruzione (%1 1 10 1 1 10) e. se 
esso è 0. eseguirà un salto in avanti, 
mentre se è 1 (come nel nostro caso) 
farà un salto indietro. 

Per salto si intende il numero di 
byte (e NON di istruzioni) che biso- 
gna escludere per rintracciare la suc- 
cessiva istruzione da eseguire. Nel 
nostro caso la CPU esegue un con- 
teggio “alla rovescia" partendo dall'i- 
struzione successiva a SDO definen- 
dola come $FF. In seguito va all’in- 
dietro fino a che arriva al numero 
contenuto nel secondo byte di $D0. 
cioè SEE, corrispondente all'indiriz- 
zo $034F. 

Il programma, allora, continuerà 
ad essere eseguito dalla "parola" suc- 
cessiva (sempre all'indietro) a $034F. 
e cioè $034E ($A9). Bisogna pertanto 
prestare la massima attenzione al se- 
condo byte delle istruzioni di 
BRANCH perchè, in caso di errore, 
potremmo far continuare il program- 


ma da un dato anziché da un'istru- 
zione o da un'istruzione indeside- 

Notiamo facilmente che il blocco 
di istruzioni $034E-$035F srà esegui- 
to 255 volte fino a che $0356 non con- 
terrà $00. consentendo alla CPU di i- 
gnorare $D0 EE. Ogni volta che il 
blocco viene eseguito, lo schermo 
viene riempito di 256 simboli di “A". 
Poiché lo schermo è di 1000 caratteri, 
il blocco deve essere eseguito quasi 
quattro volte. Vediamo come. 

PC = $0360: EE 52 03. Provvede ad in- 
crementare il MSB del puntatore alla 
memoria schermo dopo che sono 
state eseguite le 255 iterazioni previ- 
ste dal loop. 

PC = $0363: EE 57 03. Vedi istruzione 
$0360 (riguarda la memoria colore). 

PC = $0366: AD 52 03. Carica in accu- 
mulatore il dato contenuto in $0351 

PC =$0369: C9 08. Questa istruzione 
a due byte compara, mediante sottra- 
zione, l'accumulatore con il numero 
$08; se i due numeri risultano uguali, 
fornirà $00 come risultato (attenzio- 
ne: l'accumulatore non viene co- 
munque alterato, nè tantomeno il 
numero $08). 

PC = $036B: DO El. In questo caso, e- 
sattamente come prima ($035E), il 
primo bit del secondo byte è uno. e 
pertanto, nel caso in cui il risultato 
della comparazione $0369 sarà ugua- 
le a $00. il programma proseguirà al- 
l'istruzione successiva. Diversamen- 
te ci sarà un salto all'indietro fino al- 
la locazione $034E. 

PC=$036D: 60. Return from Subrou- 
tine: si esce dal L.M. e si ritorna al 

Riepilogando, il blocco $034E- 
$035F viene eseguito 255 volte, men- 
tre $034E-$036E viene eseguito 4 vol- 
te prima di tornare al Basic. 

Il lettore potrà verificare la validità 
di questa routine in Linguaggio Mac- 
china. in precedenza caricata, con il 
programmino suggerito qui sotto. 
100 SYS 826 

1 10 GET A$: IF A$="" THEN 1 10 
120 A=ASC(A$): POKE 847 A 
130 GOTO 100 



Tiriamo le somme 

Per assumere una certa familiarità 
con questo nuovo linguaggio, vedia- 
mo ora un altro esempio. Come ab- 
biamo visto in precedenza, con le co- 
noscenze che abbiamo, possiamo 
scrivere un numero intero compreso 
tra -32768 e +32767. Cerchiamo ora 
di capire come funziona il meccani- 
smo della somma tra due numeri de- 
cimali e poi esadecimali. Facendo la 
somma dell'esempio qui sotto ripor- 
tato. notiamo che quando la somma 
di due cifre corrispondenti supera il 
numero nove, dobbiamo considerare 
il riporto nella successiva colonna 
(somma tra 8 e 5; tra 6 e 4). 


Decimale 

1 1 (riporto) 

162B0 + 

4250 - 


20530 


Esadecimals 

1 Ccarrg) 

1A03 + 

9B77 - 


B57A 


Analogamente avviene per due nu- 
meri esadecimali. solo che conside- 
riamo il riporto quando la somma 
supera il numero $F (#15). Esempio: 
somma tra SA e SB nel caso sopra ri- 
portato. Prima di continuare, ricor- 
diamo che. in inglese, riporto si tra- 
duce col termine CARRY, ed in se- 
guito lo chiameremo sempre in que- 
sta maniera. Tra le istruzioni in L.M. 
del 6502 ve ne sono ben otto di som- 
ma tra due byte, e ne esaminiamo ora 

Codice esadecimale $69: istruzione 
a due byte; codice mnemonico ADC 
(da ADd accumulator immediate 
whith Cany). 

Esempio: 

69 72 

ADC #$72 


Quando il microprocessore incon- 
tra questa istruzione, esegue la som- 
ma tra il valore che si trova in quel 
momento nell'accumulatore. il nu- 
mero esadecimale S72 e l'eventuale 
Carry. 

Vediamo ora alcuni esempi: 

10 Ktn programma 4 
15 : 

88 RRlNTCHRS(147):AU-0 
30 PRINT" ADDIZIONA DUE NunEKI 
niNORI Ut 255" 

48 PR I N T "CON TENUI 1 IN «BZB ED 
IN *830" 

5B PHINI "PONENDO IL RISULTATO 

188 READ A*: IF UAL(AS)<0 THEN P 
RINT“(UIENE ATTIUAIU CON: S 
YS026) ” : PK1NT : GOTO 178 
118 Xl-ASC(LEFrs(AS.l)):X2-ASC( 

128 IF X1>S7 THEN X1-X1-SS:G0T0 


148 IF xe>57 THEN X2-X2-S5: GOTO 
160 

150 X2-X2-48 

160 POKE 82b*AD, X1*16*X2 : AU"AD" 
1 : GOTO 180 

170 INPUT "PKinO ADDENDO IN 82B 
“ ; PA : POKE B2B.PA 
160 INPUT "SECON. ADDENDO IN 638 
SA: POKE B30 . SA : SYS82b 
130 PRINT "RISULTATO IN B37 (SYS 
026)— PEEK(B37) : PRINI : PRINT 
: GOTO 170 

3 

218 DATA 68. EA.EA, 00.-1 


SOMMA TRA DUE BYTE 


1ND.N ESA DATI ONEnON. 


027 033B A3 02 

623 033D 63 87 
831 033F BD 45 03 

834 0342 68 

835 0343 EA 

B36 0344 EA 

B37 8345 00 

Analizziamo singolarmente istru- 
zione per istruzione: 

PC=$033A: 1 8. Clear Carry (CLC). I- 
struzione ad un solo byte, implicita, 
cioè non ha bisogno di indirizzi o di 
dati per la sua interpretazione. Que- 
sta istruzione cancella il Carty even- 
tualmente presente nell'apposito re- 
gistro della CPU. Ritorneremo in se- 
guito su questa istruzione. 
PC=$033B: A902. LoaD Accumula- 
tor con $02, come abbiamo già visto 
in precedenza. 


PC=$033D: 69 07. Abbiamo già 
commentato un'istruzione di que- 

PC=$033F: 8D 45 03. STore Accu- 
mulator in $0345. che viene usato co- 
me registro temporaneo. 

PC =$0342: 60. ReTum from Subrou- 
tine. già analizzata. 

PC = $0343 : EA NOP = No OPera- 
tion; trascriviamo questo gruppo di 
EA perchè in seguito sia più semplice 
rintracciare sullo schermo il risultato 
della somma nel caso si stia utiliz- 
zando un Monitor. 

Per la cronaca. EA è un'istruzione 
implicita che significa: "Non esegui- 
re alcuna operazione". Al contrario 
di quanto possa sembrare è un’istru- 
zione molto utile, come vedremo in 
seguito. 

Per far girare il programma, battia- 
mo di seguito: 

POKE 828.2: POKE830.7: SYS 826: 
PRINT PEEK (837) 

Modificando opportunamente i va- 
lori delle due POKE. il risultato della 
PEEK conterrà sempre la somma dei 
due numeri in questione. In $0345 
comparirà sempre il risultato della 
somma, a meno che la somma dei 
due numeri caricati non superi il va- 
lore $FF: infatti, consideriamo le se- 
guenti somme esadecimali: 


0C ♦ 04 - 10 (nota bene) 

40 * 0A - 4A 
0B ♦ 03 - 0E 

FC ♦ 14 - 10 (note bene) 

AB « 63 - 0E (non corretto) 


Infatti OC = 12 dee. 

04 = 04 dee. 

04 + 12 = 16 dee. = 10 esa. 

Come si può notare, allo stesso ri- 
sultato si può arrivare anche som- 
mando $FC e $14. Come facciamo o- 
ra a sapere se il valore contenuto in 
$0345 è il risultato di una somma su- 
periore o inferiore a $FF ? A tale sco- 
po consideriamo il registro di stato 
(ST) della CPU 6502: esso è un parti- 
colare registro ad 8 bit, interno alla 
CPU stessa, che memorizza diverse i- 
struzioni tra le quali il Cany. 


LOAln 2 
ADC in 7 
STA 837 
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Il bit delTST corrispondente al 
Cany viene automaticamente settato 
(posto, cioè a 1) se, dopo l'esecuzione 
di alcune istruzioni, tra le quali la 
somma, si supera il valore di SFF. Da 
quel momento esso non viene più 
cancellato (cioè resettato o portato a 
0) anche se. in seguito, si esegue una 
somma che non ha riporto. 

Ecco perchè la prima istruzione di 
una procedura di somma deve SEM- 
PRE essere CLC. che viene cosi in- 
terpretata: “Resctta il Carry, even- 
tualmente posto ad I da una opera- 
zione precedente". 


Il Carry 

Miglioriamo ora il programma in 
L.M. visto e, per fare questo esami- 
niamo un'altra istruzione di Branch 
(salto condizionato): 

BCS: Branch on Carry Set to 1 = 
Salta se il Carry è uguale ad 1 . Codice 
Operativo: BO xx. dove xx rappresen- 
ta l'entità del salto, come già verifica- 
to in precedenza. 


sonno con riporto 


IND.N ESO DOTI nNEnON . 


626 0330 16 CLC 

627 033B 09 00 LDOln 0 

829 0330 OD S2 03 STO 850 

632 0390 09 02 LDOln 2 

639 0392 69 07 ODCln 7 

836 0399 60 53 03 STO 8S1 

839 0397 80 01 BCS 1 

691 0399 60 RTS 

892 0390 09 01 LDOln 1 

699 039C 60 52 03 STO BS0 

897 039 F 60 RTS 

898 03S0 EO NOP 

899 03S1 EO NOP 

8S0 0352 00 BKK 

Bbl 0353 00 BRK 

Vediamo ora di analizzare le istru- 
zioni del programma. 

A9 00 e 8D 52 03. Queste due istruzio- 
ni scrivono $00 nella locazione S03S2 
che servirà a visualizzare l'eventuale 
riporto. 

BO 01. Se la somma appena eseguita 
supera il valore SFF. il bit di carry 
viene posto a 1. e pertanto il salto di 
un byte è eseguito c l'elaborazione 
continua da S034A. 


60. Se la somma eseguita non ha n 


j prIni-adÒiziona uue NunERt n P^rto- ij Carry rimane come prima, e 
inori in 255 “ cioè a 0 (cfr. istruzione S033A 18); si 

» pr ini “CON tenuti in «833 ed i ritorna al Basic. 

, preponendo IL risultato . A9 0I e 8D 52 03 . Nella locazione 
9 print-e tenendo conio DEL ca $0352 viene trascritto il valore $01. ad 
rry in «850“ indicare l'awenuto riporto. 

9 Facciam ° ora « Programma 

9 xi-AsccLEFTs<n*. i ) > : x2-asccr per controllarne la funzionalità: 
10MT91AS.1J» POKE 833. primo addendo: POKE 

9 1F Xl>57 THEN Xl-Xl-55 : BUIO gi( vmnl i n suLVnH/v Wt 876 


ECO. ADDENDO': SA :POK 
E B3S , SA : SY5826 
3 PRI NT “RISULTATO (IN 851>-“PE 


POKE 833,primo addendo: POKE 
835secondo addendo: SYS 826: 
PRINT PEEK(850).PEEK(85 1 ) 

Il primo valore (zero o uno) indi- 
cherà la presenza di un eventuale ri- 
porto. mentre il secondo costituirà la 
somma tra i due addendi inseriti tra- 
mite le due POKE. 

Eseguiamo ora una somma di due 
numeri, ciascuno dei quali occupa 
due byte. 


In pratica, dobbiamo dapprima e- 
seguire la somma tra gli ultimi due 
byte (EA+21), trascrivere il risultato 
da parte e tenere presente l'eventuale 
Carry (nel caso specifico esiste). In 
seguito, sommiamo i primi due byte 
tra di loro considerando anche l'e- 
ventuale Carry dell'addizione prece- 
dente (2C+32+ 1). Il programma può 
essere il seguente: 

10 REn PROURBnnn 6 

20 PR1N1CHRSC 197 1 
30 PR I NT "SOTOTA DUE NUTIEK! D1NUR 
I UI 65535 “ 

90 PRINI-CONIENUII NELLA FORnA" 
50 PRINT-LDU BYTE - MI6M BYTE" 
60 PRINT-1 ADDENDO : *828 - «83 

s- 

70 PRINT “2 ADDENDO : *830 - *83 
7“ 

80 PR INI “RISULTATO : *892 - *89 
3“ 

100 READ ASiIF UALCASX0 THEN PR 
INT“(SI AITI UA CON: SYSB26T" 
: FRINÌ: PRINT: OOIU 170 
110 X1-ASCCLEFIS(AS,1)J:X2-ASCCR 
ÌGHTSIAS. 1)> 

120 IF Xl>57 THEN X1-X1-S5: DOTO 
190 

130 X1-X1-9B 

190 IF X2>57 THEN X2-X2-S5: 6010 
150 X2-X2-98 
: 60 IO 100 

170 INPUT "L/H BYTE PRlnO AUDENO 
O" ; PI , P2: POKE 828. PI: POKE 83 
S.P2 

180 INPUT “L/H BYTE SECON ADDENO 
0“ ; SI , S2 : POKE 830,S1:POKE 83 
7 , 52 : SYS826 

190 PRINI-RISULTArO ( L/H 1 : “PEEKC 
892 1PEEKC 8931 : PRI NI : PRI NI : ISO 
TO 170 

200 DATA 18, AB. E A , 69 , 21 . BU , 9A , 03 
210 DATA A9.2C.69.32.8O.9B.03.60 
220 DATA 00,00.-1 
SOnnA CON QUATTRO BYTE 


IND.N ESA DATI nNEnON. 


826 033A 18 CLC 

827 033B A9 EA LDAIfl 239 

829 0330 69 21 ADCin 33 

831 033F 8D 9A 03 STA 892 

839 0392 A9 2C LDAIM 99 

836 0399 69 32 ADCII1 50 

838 0396 80 9B 03 STA 893 

891 0399 60 RTS 

892 039A 00 BRK 



mente presente in seguito alla prima 
somma. 11 lettore, per esercizio, può 
modificare il programma, inserendo 
una “spia” per l'eventuale secondo ri- 
porto. come abbiamo fatto nel pro- 
grammino precedentc. 

Parliamo ora di un'altra istruzione 
implicita: SED (SEI Decimai mode), 
codice operativo F8. Dall'istruzione 
successiva a SED le somme vengono 
eseguite in decimale anziché in esa- 
decimale: $F8 è di notevole comodità 
in alcuni casi; provate ad inserirla 
nei programmi precedenti o subito 
dopo. Attenzione però che se il modo 
di operare è decimale e chiediamo di 
sommare valori esadecimali si verifi- 
cano errori. Per ripristinare il modo 
esadecimale è necessaria l'istruzione 
implicita CLD (CLear Decimai mo- 
de), codice operativo $D8; senza que- 
sta istruzione, infatti, la CPU conti- 
nuerà a ragionare in decimale. Con- 
siglio a chi desidera sperimentare l’i- 
struzione SED di inserire D8 prima 
di ogni RTS per evitare malfunziona- 
menti del Basic. 

Problemi di gestione di 
un programma 

Finora abbiamo cercato di fare un 
po’ di luce sulla gestione intema del 
6502, microprocessore utilizzato, co- 
me ben sappiamo, dal Commodore 
64 e dal C128 nella versione 64. Ma 
quello che conosciamo non permette 
ancora di creare programmi di una 
certa utilità ed interesse o. per lo me- 
no, richiede sforzi particolari ed una 
notevole quantità di memoria. Si 
tratta di approfondire il discorso re- 
lativo agli indirizzamenti. Senza al- 
cuna pretesa di riproporre ciò che è 
già stato detto, vale la pena citare i 
quattro indirizzamenti che conoscia- 
mo affiancati da altrettanti esempi: 

• Implicito (AA = TAX) 

• Immediato (A9 00 - LDA #$00) 

• Assoluto (8D 00 04 = STA 
$0400) 

• Relativo (DO 03 = BNE +$03) 


Questi consentono di leggere il con- 
tenuto di una locazione di memoria, 
di modificarla e di eseguire salti con- 
dizionati. Proviamo a creare ora un 


semplice programmino che trasferi- 
sca sullo schermo un messaggio i cui 
valori ASCII sono contenuti in me- 
moria. Il programma in questione i 
numerato con 7. 



VISUALIZZA MESSAGGIO 


IND.N ESA DATI MNEMON . 


BZ6 033A 
BZ8 033C 
B31 033F 

833 03+1 

836 031+ 
B38 0316 
Bit 0313 
013 031B 

816 031 E 
810 0350 
8S1 03S3 

851 0356 

BSS 0357 
BSB 03SA 
861 03SD 
863 03SF 
866 0368 
063 0365 
878 0368 

875 0368 

876 036C 

878 036E 
800 0370 


80 5C 03 
A3 03 
80 53 03 
A3 71 
80 58 03 
A3 08 
80 61 03 

A3 00 

80 5B 03 
80 60 03 

A0 83 03 
80 1B 01 
A3 00 
80 18 08 
EE 58 03 
EE 58 03 
EE 60 03 
E8 

E0 10 
D0 E7 



La parte iniziale (da S033A a $0356) 
costituisce la necessaria inizializza- 
zione del programma. Il perchè verrà 
spiegato in seguito. Successivamente, 
l'accumulatore viene caricato con il 
contenuto della locazione di memo- 
ria a partire dalla quale sono inseriti i 
dati. Quindi il dato (in codice ASCII) 
viene posto nella casella in alto a si- 
nistra nello schermo. Le successive 
due istruzioni ( A9 00 e 8D 00 D8) set- 
tano il colore del carattere appena 
visualizzato. 

Per rendere ciclico il programma, si 
deve adesso modificare il Low Byte 
dei tre registri che fanno diretto rife- 
rimento alla memoria ed allo scher- 
mo (EE 58 03, ecc.). Il loop si chiude 
con un paragone, necessario per va- 
lutare il numero esatto di caratteri da 
trasferire, e con un salto in caso di 
mancato raggiungimento di tale nu- 
mero (E0 18 e DO E7). Si capisce 
quindi il perchè si renda necessaria 
finizializzazione. senza la quale il 
programma, che in pratica si auto- 
modifica. non avrebbe potuto girare 
più di una volta consecutivamente 
senza ingenerare errori e cattivo 
funzionamento. 

L’indirizzamento 

indicizzato 

Il programma non è certo semplice, 
ma gli "architetti" del 6502 hanno 
previsto tale evenienza e dotato il mi- 
croprocessore di un particolare indi- 
rizzamento: l'indirizzamento indi- 
cizzato. Il programma che proponia- 
mo (N.8), esegue lo stesso lavoro del 
programma appena descritto, ma in 
modo più semplice e decisamente 
più breve. 

Il “cuore" è costituito dalle due 
nuove istruzioni BD nn nn e 9D nn 
nn (LDA SnnnnJC c STA $nnnn.X); 
la loro particolarità è quella di som- 
mare al valore assoluto che segue l'i- 
struzione stessa il valore del registro 
X (registro ad 8 bit analogo ad A). 

Per esempio, supponiamo di avere 
il seguente programma: 


Ln ASSEMBLEI* 

A2 05 LUX HS05 

BD 00 01 LDA *0100 , X 

60 RTS 
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ne di lutti questi, cosicché alla resa 
dei conti abbiamo un set di 151 istru- 
zioni con tutte le varianti possibili. 

A seconda dell'operazione che 
svolgono, le istruzioni si dividono 


•TRASFERIMENTO DATI: carica- 
no i registri con la memoria (LDA, 
LDX LDY); caricano la memoria 
con i registri (STA. STX. STY); inter- 
scambiano i registri tra di loro (TAX 
TAY. TYA, TXA) 

• ELABORANO I DATI: eseguono 
le funzioni aritmetiche e logiche 
(ADC. SBC. AND. ORA. EOR); in- 
crementano e decrementano registri 
e memoria (INC, DEC. INX DEX 
INY. DEY) 

• CONFRONTI. TEST & DIRAMA- 
ZIONI: eseguono confronti fra regi- 
stri e memoria (CPX CPY. CMP); e- 
seguono diramazioni in seguito a 
confronti con il registro di stato P 
(BMI. BPL. BCC, BCS. BEQ. BNE. 
BVS. BVC) 

• CONTROLLO: modificano il regi- 
stro di stato P (CLC. SEC. CLD. 
SED. CLV) 

• FLUSSO DI PROGRAMMA: ese- 
guono salti con o senza ritomo ( JM P. 
JSR. RTS. RTD 

Analizzate le istruzioni di base, ri- 
capitoliamo i medodi di indirizza- 
mento. quelli cioè che determinano il 
campo nel quale agisce una determi- 
nata istruzione: 

• IMPLICITO (I byte) riguarda per 
lo più la gestione interna dei registri 
(TAX INX). ma si può occupare an- 
che della gestione del flag di stato P 
(CLC) e deUlnterrupt (CLI. SEI): 
non richiede in nessun caso che ven- 
gano specificati parametri. 

• IMMEDIATO (2 byte) l'operazione 
indicata dal codice operativo viene e- 
seguita sul numero che lo segue im- 
mediatamente (come: LDA #500); 
l’operando, naturalmente, non può 
essere maggiore di 255. 

• ASSOLUTO (3 byte) l'operando 
che deve essere "trattato" dall istni- 
zionc è contenuto nel registro di me- 
moria identificato dai 2 byte che se- 
guono il codice operativo stesso (L- 
DA SAIOO); i due byte sono nella so- 
lita disposizione LB, HB. 


• PAGINA ZERO (2 byte) variante 
dell'indirizzamento assoluto, pone 
automaticamente HB uguale a 0. li- 
mitando cosi il campo dell'operazio- 
ne alle prime 256 locazioni di memo- 
ria che. peraltro, contengono dati 
molto importanti per il funziona- 
mento del calcolatore (LDA SFO); ta- 
le restrizione aumenta la velocità 
di esecuzione. 

• RELATIVO (2 byte) la parola che 
segue l'istruzione indica uno sposta- 
mento. in avanti di 128 parole ed al- 
l'indietro di 127. secondo uno stan- 
dard piuttosto complesso (BEQ 
$+ 1 2); in ogni caso provvede ai debi- 
ti calcoli l'assemblatore. 

• INDICIZZATO (2 byte in pagina 
zero oppure 3 byte se assoluto) l'indi- 
rizzo sul quale deve agire l'istruzione 
viene ottenuto dalla somma del dato 
(o dei dati se assoluto) posto dopo il 
codice operativo, con il registro inter- 
no (solo X e Y) specificato nell'istru- 
zione stessa (LDA SA00I.Y); se ab- 
biamo per esempio l'istruzione LDA 
SC000.Y .dove Y = SOS. la locazione di 
memoria che verrà posta in A sarà 
S(C0OO+O5) = SCOO5. 

L’indi rizzamento 
indiretto 

Vediamo ora di fare conoscenza 
con findirizzamento indiretto. 

Il termine "indiretto" tecnicamente 
deriva dal fatto che invece di preleva- 
re l'indirizzo che segue immediata- 
mente l'istruzione, il successivo valo- 
re nella sequenza di programma è un 
puntatore all'indirizzo interessato. 
Chiariamo meglio il concetto. 

Tutti sanno che nelle pagine 0.I.2J 
(cioè nelle locazioni di memoria che 
vanno da 0 a 1023. appena sotto il vi- 
deo) sono contenuti un gran numero 
di puntatori, che "puntano", per l'ap- 
punto (!). a routine nelle ROM fon- 
damentali per il funzionamento del 
Commodore 64. E - anche noto che 
questo fatto aumenta notevolmente 
le doti di flessibilità del calcolatore, 
perchè permette all'utente di modifi- 
care a proprio piacimento tutti o qua- 
si i procedimenti normalmente ese- 
guiti automaticamente. A questo 
punto è lecito chiedersi come faccia il 
6502 a prelevare l'indirizzo indicato 
nei puntatori. In effetti, con le cono- 


scenze che abbiamo a disposizione, 
questo non è permesso, a meno di 
complicazioni assurde che rasenta- 
no il limite della correttezza e della 
linearità di programmazione. 

Ma gli "architetti" del 6502 hanno 
pensato anche a questo, creando 
un'unica istruzione che sfrutti l'indi- 
rizzamcnto indiretto non indicizzato 
(più oltre analizzeremo l'indicizza- 
zione abbinata all'indirezione). ma 
che si rivela di importanza fonda- 
mentale soprattutto nella gestione 
della ROM cui accennavamo prima: 
si tratta dell'istruzione di salto indi- 
retto JMP (XXXX)lcodicc operativo: 
6C XX XX). Il suo funzionamento è 
piuttosto semplice da capire, ma oc- 
corre prestare sempre una certa at- 
tenzione ai calcoli da eseguire in fase 
di stesura del programma c di modi- 
fica dei puntatori. Infatti in seguito a 
questa istruzione il P.C. (Contatore 
di Programma) viene modificato in 
modo tale che il Low Byte sia carica- 
to con la parola contenuta nella loca- 
zione di memoria indicata dall'istru- 
zione. e che I' High Byte sia caricato 
con il contenuto della locazione im- 
mediatamente seguente a quella in- 
in altre parole data l'istruzione 
JMP(S0306) e supponendo che $0306 
contenga il dato SIA e che $0307 con- 
tenga il dato $A7. il P.C. si posizione- 
rà all'indirizzo $A714 (vettore di 
List). 

L'utilità pratica del fatto di avere in 
un'arca RAM (e quindi modificabi- 
le) tutti i vettori relativi alle funzioni 
più importanti è basilare, perchè per- 
mette di alterare tali routines. imple- 
mentandole o addirittura sostituen- 
dole con altre create dall'utente. 

Accennavamo prima alla possibili- 
tà di abbinare l'indicizzazione alla 
tecnica dell'indirezione. Fin d'ora è 
bene chiarire che esistono due solu- 
zioni ben differenti fra loro, nono- 
stante la buffa (ma non troppo) ca- 
ratteristica di chiamarsi pressappoco 
allo stesso modo (indirizzamento in- 
dicizzato indiretto e indiretto indi- 
cizzato). La caratteristica pratica che 
li contraddistingue è che la prima di 
queste tecniche sfrutta solo ed esclu- 
sivamente l'indice Y. mentre la se- 
conda quello X Prima di osservare le 
ulteriori differenze, è indispensabile 
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in REM programma a 

80 PRINTCHRS(117);CHRSC13) 

30 PRINT“FA APPARIRE IN ALICI A 
SINISTRA" 

10 PR INI "SULLO SCHERNO UNA SCRI 

50 PR I NT "C0NIENU1 A IN MEMORIA” 
60 PRINT"SFRUT TANDU L’INDICIZZA 
Z 1 ONE “ 

100 READ AS: IF UAL(A»)<0 THEN PR 
INI“AIIIUARE CUN: SYSd86’:tN 
0 

110 Xl-ASCCLEFISCAS. 1)):X8-ASCIR 
IGKTSCAS.l)) 

180 IF X1>S7 THEN XI -XI -SS: BOTO 
110 

110 IF X8>S7 THEN X8-X8-SS : GOTO 



160 POKE 886+ AD, X1-16-X8 : AO-AD-1 
: BOTO 100 

800 DATA A8. 00.BU. IO. 03. 9U, 00. 01 
810 DATA A3. 00, SU, 00.06, EU. E0, 18 

880 DATA D0.F0.60 

881 REM nESSAUSlO DA UISUALIZZAR 

885 DATA 13.1F.1D.1D.1F 
830 DATA 11 , IF , 58 , 15 , 80 , 13 . IF , 1D 
810 DATA 50. SS, SI, 1S, 58. 80. 13, 1C 
850 DATA 55,18,80,00,-1 


MESSAGGIO INDICIZZATO 


IND.N ESA DATI NNENON. 


B86 033A 

B80 033C 

031 033F 

031 0318 

836 0311 

039 0317 

B10 0318 

018 031A 

811 031C 


AS 00 
BD 1D 03 
9D 00 01 





LDAX BIS 
STAX 1081 
LOAin 0 
STAX 55896 
INX 

CPXIfl 81 
BNE 810 
RTS 


L'accumulatore verrà caricalo con 
il contenuto della locazione $<0400+ 
05) =$0405. Dunque, il registro X vie- 
ne sommato al valore assoluto, e solo 
allora viene letta la locazione risul- 
tante. Analogo ragionamento vale 
per 9D nn nn, che. invece di leggere, 
modifica il contenuto della locazio- 
ne risultante. 


A tutto questo discorso aggiungia- 
mo l'incremento e la comparazione 
del registro X con il valore assoluto 
ed otteniamo il programma in que- 
stione. Due aspetti importanti da sot- 
tolineare sono i seguenti: 


• Il valore assoluto dell'indirizza- 
mcnto rimane sempre lo stesso; 
quindi il programma non si automo- 


difica e non ha bisogno di inizia- 
lizzazione. 

• Il 6502 tiene conto anche del ripor- 
to. vale a dire che. se nel corso del 
programma si supera una pagina di 
memoria, l'indicizzazione provvede 
a tutto. Esempio: $(7BFE+05)dà au- 
tomaticamente S7C04. 

Per quanto riguarda il trasferimen- 
to di blocchi con più di 256 locazioni 
di memoria, si può dare un'occhiata 
al programma N.9. 

10 REO PROGRAnnA 9 

80 PRINTCHRSC 117 ) ; CHRSl 111 
30 PRI NT “STAMPA SULLO SCHERMO 0 

10 PRI NT “COMMODORE 61 LE ISTRUZ 

50 PRINT-BASIC ED I MESSAGGI DI 
ERRORE" 

60 PRI NT “SFRUTTANDO L’INDICIZZA 
ZIONE" 

100 READ AS: I F OALCASX0 THEN PR 
INT“ATTIUARE CON: SYS086":EN 

110 Xl-ASCCLEFTSC AS. 1 )>:X8-ASCCR 
IGKTSC AS ,1)1 

180 IF Xl>57 THEN XI— X1-5S: GOTO 
110 

130 X1-X1-1B 

110 IF X8>57 THEN Xe-X8-SS:G0I0 
160 

1S0 XB-X8-1B 
: GO IO 100 

800 DATA A9.01.BD.7B.03.AS, A0.BO 
810 DATA 78,03, A3, DB. SU, 80,03, AS 
880 DATA 00 , BU . 77 , 03 , BD , 7A , 03 , 80 
830 DATA 7F,0J.A0.03.AZ,00.Z0,7b 

850 DATA 7B [ 03 ! EE ! B0 1 03 ] BB D0 [ EC 
860 DATA 80.76,03.A8,EB.80.7b,03 
870 DATA CA. 00. FA, 60,80.00, A0.3D 
800 0AT A 00 , 01 , A3 ,00.30, 00 . Ub , b0 


Questo provvede a trasferire sullo 
schermo le istruzioni del Basic ed i 
relativi messaggi di errore. La sua 
struttura non è molto differente da 
quella dei programmi appena com- 
mentati. pur sfruttando l'indicizza- 
zione. La differenza è che invece di 
alterare il Low Byte della locazione 
di memoria interessata, viene fatto 
variare lo High Byte. 

Per riempire lo schermo del C/64, 
sono necessari 3 cicli da 256 byte l'u- 
no. più un semiciclo (chiamato di of- 
fset) da 232 byte (256*3+232= 1000). 
Per il conto dei cicli viene usato il re- 
gistro Y (analogo ad A e X), che viene 
decrementato ogni 256 byte trasferiti, 
mentre l'inizializzazione si rende ne- 
cessaria per impostare i corretti valo- 
ri negli High Byte modificati dal pro- 
gramma stesso. L'istruzione 20 nn nn 
(JSR Snnnn) consente di fare un salto 
ad un determinato sottoprogramma 
e di ritornare al punto di partenza 
quando incontra l'istruzione $60 
(RTS). Ma anche questi limiti posso- 
no facilmente essere superati ed in 
seguito ne vedremo il metodo. 


Un breve riepilogo 

In precedenza abbiamo analizzato 
le istruzioni più importanti ed alcuni 
indirizzamenti tipici del 6502. Prima 
di riesaminarle molto velocemente, è 
bene ricordare che le istruzioni sono 
in tutto 56. mentre gli indirizzamenti 
disponibili sono 13; comunque nes- 
suna istruzione prevede l'utilizzazio- 
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osservare che entrambe "lavorano" 
solo in pagina zero, aspetto questo da 
tenere bene a mente. 

L’indicizzato 

indiretto 

L'indirizzamento indicizzato indi- 
retto (quello che sfrutta il registro Y, 
per intenderci ) si comporta nel modo 
seguente: 

Tindirìzzo effettivo dell'istruzione è 
dato dal contenuto della locazione in 
pagina 0 (L.B.). più il contenuto della 
locazione successiva moltiplicato 
per 256 (H.B.), più il registro Y (indi- 
ce). In altre parole, i due bytes in pa- 
gina 0 (dei quali viene indicato solo il 
primo), sono dei puntatori ad una ta- 
bella di 256 elementi locata in qual- 
siasi area della memoria, che può es- 
sere scorsa per intero incrementando 
o decrementando (INY. DEY) solo 
l'indice Y. 

Esempio: LDA($F0),Y 

Se la locazione SFO contiene il dato 
$16 e $F1 contiene SCO, e Y vale $03. 
carica l'accumulatore con il contenu- 
to della locazione di memoria $ 
(C016-t-03)=$C019. 

L’indiretto 

indicizzato 

Nel caso dell'indirìzzamento indi- 
retto indicizzato (con X come indi- 
ce). le cose sono lievemente diverse. 
L'indice, infatti, viene aggiunto im- 
mediatamente all'indirizzo specifi- 
cato dall'istruzione, per puntare ad 
un altro indirizzo indiretto (espresso 
nella forma: LB. HB) sempre in pagi- 
na 0. E' importante rilevare che la 
somma non tiene conto del riporto, 
quindi se il risultato supera il limite 
della pagina la locazione considera- 
ta è quella risultante diminuita di 
256. Tale caratteristica permette di 
creare una tabella di puntatori allo- 
cati in pagina 0 che può essere ana- 
lizzata modificando semplicemente 
l'indice X (INX. DEX). 

Esempio: LDA($F0.X) carica in A 
la "parola” (dato) il cui indirizzo è 
puntato dal contenuto della coppia 
di locazioni $(F0+X). come low byte, 
e $(F0+1+X), come high byte. 


Dunque, ricapitolando, l’indice Y 
influisce sull'indirizzo effettivo, men- 
tre l'indice X modifica direttamente i 
puntatori in pagina 0: ed ecco spiega- 
ta la strana somiglianza dei due no- 
mi. Dall'uso contemporaneo di en- 
trambe le tecniche risultano vantaggi 
immediatamente apprezzabili che 
permettono finalmente di lavorare in 
linguaggio macchina con linearità 
e disinvoltura. 

Applicazioni 

Per quanto riguarda le applicazio- 
ni. credo che i programmi proposti si 
commentino da soli, ma li analizze- 
remo. comunque, separatamente. 

la rem programma 10 

20 RRINICMkSt 147) .CMRSt 1«* J 

30 PRINT " TRASFERISCE SULLO SCME 
ROO DEL" 

40 RK INI “COMMODORE 64 LE 15IRUZ 
IONI BASIC EU" 

S0 RK I NI " I HESS AUGI 01 CONIKOLL 

60 RklNl "SFRUTTANDO L 1 INDIRIZZA 

70 RRINI"! NU t REI 1 0 (CON Y)“ 

INT-A11 1UARE CON: 5YS991S2": 
ENU 


110 X1-ASCILEFTS(AS, 1)) :X2-ASC(R 



140 !K X2>S7 1 MEN Xe-X2-SS:G010 


150 X2-X2-48 

160 RUXE 4915e-»AU.Xl»lb«-XZ:AU-AU 

200 CAIA AS.04.US.62.A9,A0,BS.b4 
210 OAIA AS . OS . SS . 6b , A9 . 00 . 85 , b 1 


220 DATA BS.b3.US.b5,A2.03,A0,00 
230 DATA 20, 23, C0.A2, 01, A0.EB, 20 

250 DA I A 63 ] SI ! bl ! Btì .' U0 Fb | £b b2 


Il programma 10 esegue esattamen- 
te la stessa operazione dell'ultimo 
programma presentato in preceden- 
za. e cioè trasferisce i messaggi di er- 
rore ed i tokens del Basic sul video, 
solo che sfrutta la tecnica dell'indi- 
rizzamento indicizzato indiretto (Y). 
La prima parte costituisce la necessa- 
ria inizializzazione. che permette di 
ripetere più volte l'esecuzione senza 
incorrere in grossolani errori. Tutti i 
valori interessati ($AOOO. $0400. 
$D800) vengono sistemati in pagina 
0; nel nostro caso vengono locati in 
un'arca destinata al floating point 
(FLP). e che quindi va adoperata so- 
lo quando non si usa il FLP. In ogni 
caso a lato è riportata una tabella di 
locazioni libere o per lo meno utiliz- 
zabili in pagina 0. 

Il registro X indica il numero di 
blocchi (da 256 bytes l'uno) che devo- 
no essere trasferiti, mentre il registro 
Y contiene l'eventuale OFFSET, cioè 
il numero di bytes (inferiori a 256) 
che devono essere trattati oltre ai pre- 
cedenti blocchi. La subroutine si è re- 
sa necessaria per meglio identificare 
la parte centrale del programma, che 
del resto è già chiara per conto suo: a- 
nalizzandola ci si rende effettiva- 
mente conto della funzione di X co- 
me contatore per 256 e della funzione 
di Y come indice. 


UISUALIZZA MESSAGGI CINUIR. INDIO. INDIRETTO) 


IND.N ESA DATI MNEMON. JNO.N ESA DATI MNEMON . 


49152 C000 A3 04 
49154 C002 85 62 

49158 C006 85 64 

49160 C000 A9 DB 

49162 C00A 85 6b 
49164 C00C A9 00 
49166 C00E 85 61 
49168 C010 85 63 

49170 C012 85 65 


LDAIM 4 49183 

SIAZ 98 49186 

LDAIM 160 43187 
SIAZ 100 19)89 

LDAIM 216 43191 

SIAZ 102 
LDAIM 0 49193 

STAZ 97 49195 

STAZ 99 49196 

STAZ 101 49198 

LDXIM 3 49200 

LDY1M 0 49202 

JSR 49187 49204 

LDYIM 232 49207 


C01F 20 c 
C022 60 

C023 A9 C 
C02S 91 6 
C027 81 E 

C029 91 E 

C02C 00 F 
C02E E6 E 
C030 E6 E 
C032 E6 E 
C034 CA 


JSR 49187 

LDAIM 0 
STAIY 101 
LDAIY 99 
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PRIN1CHK»U17),CMR»(11) SD HK I N1UKKJC 117 ) . CHK»( 11 ) 

PKINf "TRASFERISCE SULLO SCHE 30 PR I NT" I nPOST A E PULISCE LI 
PnU DEL - AG INA GRAFICA" 

PKINl-COnnOOOKt bl LE 1S1RUZ 10 PRINr"SFRUriANOO LINUIR1. 
IONI BASIC EU" RENIO INDICIZZATO" 

PKIN1-I OESSAGGI Ul CUN1KULL S0 PRINflNUI RE f IO (IN VI. IH 

0 - DI U1SEUNA UNA" 

PHINI-SEKU11ANUO LE KUUIINES 60 PRINI-SINUSOIOE" 

UELLA _TV 100 READ AS:IF UALlAtlllI ] HEN 

REAU ASIE UALCASK0 IMEN PR 1 NT "All I UARE CON: SYSISISt 

1 NI "AI 1 I UARE LUN. SYSialSef": UN170":END 


• Il programma 12. inserito per scopi 
puramente dimostrativi, è una scm- 
p plics impostazione della pagina gra- 
fica e della sua pulizia, ricalcando c- 
a sanamente la procedura Basic, l'uni- 
ca differenza? Provate a cronomclra- 
'* re quanto tempo ci mette, se ci 
riuscite! 

x «Il programma 13 è un'applicazione, 
indubbiamente futile e banale, di en- 
trambe le tecniche di indicizzazione. 
La prima parte serve per inizializza- 
re i puntatori, trasferendo in pagina 
zero i sei byte che seguono immedia- 
tamente il programma stesso. Per fa- 
re ciò si sfrutta l'indicizzazione indi- 
i retta, anche se obiettivamente se ne 
potrebbe fare a meno: ciononostante 
è importante rilevare la tecnica uti- 
lizzata. vale a dire piazzare i puntato- 


si BY-blSS*RU*3S0*U" 
2S0 POKE BY . PEEKC UY ) 

S 30 NEXT : POKE 10S1.lt: 

eie goto S 10 



01 SUOLI ZZA IRE MESSAGGI 


INO .N ESA DATI MNEMON. 


19156 C001 A3 00 

4915B C006 BS FC 

49160 C00B A9 41 

49164 C00C A3 C0 
491GB C0OE BS FE 
4916B C010 A0 0S 

49170 C016 B1 FO 

49175 C014 91 FB 



191B0 C01C 

49184 C050 

49 IBS C055 
491 88 C054 
49130 C056 

49195 C05B 

49194 C0SA 

49195 C05B 

49196 C05C 
49198 COSE 
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49503 C033 Fb 17 

49505 C03S BB 

49506 C036 10 F6 

49508 C03B A9 BO 

49510 C03A 50 CA FI 

49513 C03O 4C 00 C0 

49516 C040 60 



ri in fondo al programma per poi riu- 
tilizzarli quando serve: in caso di uti- 
lizzo di numerosi indirizzi la tecnica 
c fondamentale. Dopo l'inizializza- 
zione vengono chiamate due sotto- 
procedure della ROM. la SCNKEY 
(SEA87) che "legge" la tastiera, e la 
GETIN (SFI3E) che riporta in A il 
valore ASCII del tasto premuto. Per i 
controlli si sottrae S30 (il numero "1" 
corrisponde al codice ASCII S31). A 
seconda sia stato premuto il tasto 1.2 
oppure 3. un diverso messaggio viene 
stampato sullo schermo: premendo il 
tasto 0 il programma termina. Per 
scrivere sullo schermo si sfrutta 
un'altra procedura della ROM. la 
CHROUT (SFICA) che trasferisco 
sullo schermo il carattere il cui codi- 
ce ASCII è contenuto in A. Quest'ul- 
tima parte sfrutta l'indirizzamento 
indiretto indicizzato (con X) per 
puntare al messaggio desiderato, che 
si può trovare ovunque nella memo- 
ria. e la cui lunghezza è indicata 
da Y. 

Naturalmente il gruppo di pro- 


grammi commentati vuole essere so- 
lo una base di partenza, una propo- 
sta che viene offerta all'utente allo 
scopo di escogitare nuove applica- 
zioni e soluzioni sfruttando appieno 
la propria fantasia. Quindi, in bocca 
al lupo e... buon divertimento! 


La tabella riepilogativa 

Giunti a questo punto del corso sul 
Linguaggio Macchina, abbiamo pen- 
sato di riepilogare sia i concetti di cui 
ormai siamo padroni (!) sia quelli 
che conosciamo (forse solo per senti- 
to dire), in una tabella che compren- 
de e riguarda tutto il set di istruzioni 
del 6502. microprocessore utilizzato 
dai nostri beneamati Commodore 
64. VIC 20 ed ora. nella versione 7501. 
anche dal Commodore 16 e dal 
PLUS 4. 

La tabella è rivolta fondamental- 
mente a chi di Linguaggio Macchina 
conosce già qualcosa, non fosse altro 
che per il nostro corso. Teniamo a 
chiarire che può essere utile tanto per 
l'esperto, che non può ricordare a 
memoria proprio tutto (a meno che 
non sia un "maghetto”). quanto per il 
principiante, che il più delle volte 
non sa proprio dove sbattere la testa 
per trovare quello che gli serve (c ci 
siamo passali tutti!). 

Dunque una guida pratica, como- 
da. che può essere utilizzata in qual- 
siasi situazione e per qualsiasi scopo 
(e in questo momento sto pensando 
al buon caro e vecchio "bigino"). Ma 
bando ai preamboli ed entriamo nel 
merito della tabella. 

Il set completo di istruzioni utiliz- 
zabili dal programmatore in Lin- 
guaggio Macchina, consta di 56 ope- 
razioni diverse. Ciascuna di queste o- 
perazioni viene utilizzata sfruttando 
un determinato indirizzamento. In 
tutto sono disponibili 13 indirizza- 
menti. che analizzeremo più avanti. 
Naturalmente non sono permessi 
tutti i possibili abbinamenti tra ope- 
razione ed indirizzamento e. alla re- 
sa dei conti, potremo sbizzarrirci con 
"solo" 151 istruzioni. 

A scanso di equivoci e di telefonate 
di protesta in redazione, premettia- 
mo immediatamente che in questa 
tabella è stato volutamente tralascia- 


to un dato caratteristico del funzio- 
namento del microprocessore. Allu- 
diamo al numero dei “cicli" necessa- 
ri per ciascuna istruzione o. per dirla 
all'americana, al "timing". 

Questa omissione è stata voluta pro- 
prio per motivi di chiarezza e di utili- 
tà: la tabella dovrà servire principal- 
mente non a "mostri" di programma- 
zione. ma ad utenti normali (senza 
offesa per alcuno, naturalmente) ai 
quali di timing e non timing interessa 
ben poco. Fra l'altro, detto fra noi. chi 
ha già utilizzato seriamente il com- 
puto dei cicli di un programma scagli 
pure la prima... telefonata! 

La tabella sfrutta la caratteristica 
accennata in precedenza: ogni ope- 
razione interviene in un campo di- 
verso. dando luogo alla vera e pro- 
pria istruzione. 

Verticalmente, nella prima colon- 
na a partire da sinistra, sono riporta- 
te le parole chiave a nostra disposi- 
zione (ADC. AND. eccetera), mentre 
orizzontalmente, nella prima riga in 
alto, le varie indicizzazioni abbina- 
toli. 

Il punto di incontro della riga con 
la colonna interessata, individuerà 
un campo, caratteristico dell'istru- 
zione che vogliamo utilizzare (non 
tacciateci di banalità, non siamo tutti 
geni...). Questo campo contiene in 
realtà tre valori diversi, che vanno 
sempre tenuti presenti al momento di 
programmare. Le prime due cifre ri- 
guardano il codice utilizzato per di- 
stinguere quella determinata istru- 
zione. I numeri sono diversi, ma solo 
apparentemente, perchè l'unica dif- 
ferenza c costituita dalla loro base 
numerica: il primo è espresso in no- 
tazione decimale (#). mentre il se- 
condo in quella esadecimale (S). Tale 
accorgimento può sembrare super- 
fluo. ma spesse volte ci si può trovare 
a dover utilizzare una base piuttosto 
che l'altra, vuoi per un compilatore 
assembler non troppo sofisticato, 
vuoi perché si sta creando un pro- 
gramma con delle semplici PÒKE da 
BASIC, e vi posso garantire che gli 
errori di conversione sono veramente 
grossolani e madornali. 

Dunque, il primo valore esprime il 
codice operativo in notazione deci- 
male. il secondo in esadecimale. ed il 
terzo riguarda la lunghezza effettiva 



di ogni istruzione, cioè lo spazio uti- 
lizzato in memoria. 

Ogni istruzione può richiedere 1. 2 
oppure 3 byte a seconda dcU'indiriz- 
zamento utilizzato. Il terzo valore del 
campo (N) riguarda appunto la sua 
lunghezza globale. E importante ri- 
cordare che il numero riportato è 
comprensivo dell'istruzione stessa. 
Quando, per esempio, si dice di una 
istruzione che c "a due byte", voglia- 
mo significare (e non solo noi) che 
oltre al codice operativo stesso abbia- 
mo un solo byte di lavoro. 

A questo punto, prima di procedere 
con la chiarificazione circa gli indi- 
rizzamenti. si rende necessario un e- 
sempio. Supponiamo di avere l'istru- 
zione JSR SA183 e di volere sapere 
quali valori vengono effettivamente 
posti in memoria. Innanzitutto cer- 
chiamo la parola chiave nella colon- 
na verticale, poi procediamo oriz- 
zontalmente: l'unico indirizzamento 
disponibile è quello assoluto (guarda 
caso). Il campo che abbiamo indivi- 
duato contiene 3 valori: 032. 20. 3. 

Il primo, che per il momento non 
interessa, è espresso in decimale: il 
secondo è il codice operativo che cer- 
cavamo. mentre il terzo ci dice che la 
nostra istruzione richiede altri due 
bytes per specificare l'indirizzo di 
partenza della nostra subroutine. 
L'indirizzamcnto assoluto (vedi ol- 
tre) vuole che i due bytes successivi 
all'OP CODE siano espressi nella 
forma LB. MB. La nostra istruzione 
si presenta dunque nella memoria 
come: "20 83 Al”. Se volessimo crea- 
re una routine in LM. partendo da 
Basic con i soliti READ. DATA e PO- 
KE. nelle istruzioni DATA dovrem- 
mo digitare i seguenti numeri deci- 
mali: "DATA 32.131.161 ". Chiarito il 
chiaribile. analizziamo in dettaglio i 
vari indirizzamenti. 

Gli indirizzamenti 

• IMPLICITO. Un' istruzione impli- 
cita deriva il suo nome dal fatto che 
non contiene specificamente l'indi- 
rizzo dell'operando su cui opera, ed 
infatti non richiede niente oltre al co- 
dice operativo stesso. Tipicamente 
viene utilizzato per operazioni che 
riguardano esclusivamente i registri 

Esempio: INX^ E8 


• ASSOLUTO. Abbiamo già visto 
nell'esempio precedente che tale in- 
dirizzamento richiede 3 byte, dove il 
primo 6 il codice operativo stesso, ed i 
restanti due costituiscono l'indirizzo 
a 16 bit che specifica l'operando. Tale 
valore, dal momento che il 6502 è un 
microprocessore ad 8 bit (tratta cioè 
solo valori fino a 255). viene codifica- 
to nella memoria secondo il consueto 
ordine LB. HB .ottenuti grazie alla 
ancora più consueta formula MB int 
(N/256). l.B N-256*HB 

Esempio: LDA SA9B0 AD B0 
A9 

• IMMEDIATO. In questo caso l'o- 
perando non è contenuto nella loca- 
zione puntata dall'istruzione, ma è 
costituito dal secondo byte stesso: 
naturalmente (per la limitazione de- 
gli 8 bit) sono impegnati in totale solo 
due byte. 

Esempio: LDA #S00 = A9 00 

• PAGINA ZERO. Per definizione 
sono impiegati soltanto due byte e 
questo è ben lungi dal costituire una 
limitazione: si può considerare come 
una variante delfindirizzamento as- 
soluto. in quanto in pratica il 6502 
pone automaticamente a zero l'HB 
dell'operando, senza quindi che ci 
sia bisogno di specificarlo. Questa 
forma impiegata consente non solo 
uno spazio minore, ma anche, e so- 
prattutto. una maggiore rapidità di e- 
secuzione in virtù dell'ormai accen- 
nato timing. Va impiegato tutte le vol- 
te che si eseguono operazioni sui re- 
gistri in pagina zero, che come sap- 
piamo. sono molto importanti per il 
normale funzionamento del calcola- 
tore. 

Esempio: LDA SFB » A5 FB 

• ACCUMULATORE Riguarda so- 
lo alcune istruzioni che interessano 
l'accumulatore, quindi prevalente- 
mente operazioni di scorrimento. E' 
simile all'implicito, dal quale si diffe- 
renzia solo concettualmente. 

Esempio: LSR A 4A 

• INDIRETTO INDICIZZATO. 
Sfrutta l'indice X c serve soprattutto 
per creare tabelle in pagina zero che 
possono essere scorse modificando il 
registro X. 

Esempio: LDA(SFB.X) = Al FB 

• INDICIZZATO INDIRE ITO. Uti- 
lizza l'indice Y e si differenzia dal 
precedente non solamente per l'indi- 


ce utilizzato. Serve, infatti, prevalen- 
temente per gestire tabelle presenti in 
qualsiasi parte della memoria. Abbi- 
nato opportunamente al precedente 
offre caratteristiche di flessibilità ve- 
ramente eccezionali. 

Esempio: LDA (SFB).Y Bl FB 

• ASSOLUTO INDICIZZATO in X 
c Y. Nonostante sia molto più sem- 
plice del precedente, offre ugualmen- 
te ampie possibilità. Grazie a questo 
indirizzamento si può modificare 
l'operando di un'istruzione assoluta 
facendo variare un indice: natural- 
mente sono necessari 3 byte. Suppo- 
niamo di avere il seguente program- 


LDX #S05 
LDA SA0OO.X 
RTS 

L'accumulatore sarà caricato con il 
contenuto della locazione $(A000+ 
05). 

Esempio: LDA SA000.X = BD 0» 
A0 

• PAGINA ZERO INDICIZZATO 
IN X ED IN Y. Variante del prece- 
dente. applica le caratteristiche di in- 
dicizzazione alle operazioni in pagi- 
na zero. Valgono tutte le indicazioni 
già esposte relative alfindirizzamen- 
to in pagina zero. Esiste una fonda- 
mentale differenza tra questo indi- 
rizzamento c quello indiretto indi- 
cizzato (e indicizzato indiretto), insi- 
ta proprio nclfindirezione. 

Esempio: LDA SAI.X = B5 Al 

• INDIRETTO. Viene utilizzato solo 
da un'istruzione: JMP(SXXXX). L'e- 
secuzione del programma viene tra- 
sferita ad una locazione individuata 
sfruttando la stessa tecnica di indirc- 
zione di cui parlavamo prima. Esem- 
pio: se l'istruzione in questione è 
JMP (SAI 23). il registro SA123 con- 
tiene XX ed il registro S(AI23+01) 
contiene YY. il contatore di program- 
ma verrà caricato con il valore 
SYYXX. e da qui proseguirà fcsccu- 

Esempio: JMP (SA123) = 6C 23 
Al 

Conclusa la carrellata sugli indiriz- 
zamenti. scopriamo altre due colon- 
ne sulla tabella che sono importan- 
tissime per la programmazione c per 
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la comprensione del Linguaggio 
Macchina. Immediatamente a destra 
della colonna che riporta le parole 
chiave, viene fornita una breve de- 
scrizione. che aiuta a meglio com- 
prendere il compito realmente svol- 
to dall'istruzione. 

Tali indicazioni sono sia in inglese 
che in italiano. Questa doppia no- 
menclatura può servire per meglio 
abbinare mnemonicamente il nome 
con l'operazione eseguita. Per esem- 
pio. pensando a “BEQ". viene più 
spontaneo collegarlo a "Branch on 
EQual" che a "salta se uguale ", ma 
comunque è solo questione di abitu- 
dine. 

Oltre a ciò. vengono indicati, nel- 
l'ultima colonna a destra, tutti i sin- 
goli bit che compongono il byte di 
status, fondamentale per il funziona- 
mento del calcolatore. Nell'ordine 
sono riportati: 
l-lntemipt N-Negative 

D- Deci mal Z-Zero 

V-oVerflow C-Carrv 

I bit interessati dalla determinata i- 
struzione sono segnati con un asteri- 
sco. con uno 0 oppure con un 1 se lo 
scopo dell'istruzione è espressamen- 
te quello di modificarli. 

In fondo alla tabella è stata aggiun- 
ta una legenda molto schematica per 
la corretta interpretazione di tuni i 
simboli, convenzionali e non. utiliz- 
zati. Ultima nota di ordine tipografi- 
co è quella di prestare attenzione alla 
somiglianza fra la lettera "O" la lette- 
ra "D" ed il numero "0 questo non è 
stato sbarrato diagonalmente, ma la 
differenza è veramente notevole se si 
osserva con attenzione. 

Bene, crediamo di avere parlato fin 
troppo, quindi vi lasciamo alla tabel- 
la. trampolino di lancio verso l'afTa- 
scinante mondo del Linguaggio Mac- 

Gli indirizzamenti 
come li vede il computer 

Come conclusione di questo mini- 
corso di programmazione in lin- 
guaggio macchina, abbiamo ritenuto 
utile riportare alcune tabelle per 
chiarire meglio il procedimento che 
segue il computer per interpretare le 
istruzioni. Ben lontano dal voler mo- 
strare i flussi di dati all'interno del 


microprocessore, i grafici qui ripor- 
tati illustrano la condizione dei regi- 
stri A. X e Y. sia prima che dopo 
una istruzione. 

Lo scopo, molto evidente, è quello 
di familarizzare con la logica del cal- 
colatore. dal momento che il vero se- 
greto per programmare in linguaggio 
macchina, è di riuscire a pensare allo 
steso modo del computer. Non diver- 
samente che per lo studio delle lin- 
gue. se si vogliono ottenere buoni ri- 
sultati in una conversazione, la diffi- 
coltà. una volta imparata la sintassi 
ed un minimo di vocabolario, consi- 
ste nel pensare in quella determinata 
lingua, e non certo a prodigarsi come 
improvvisati traduttori (per quello 
scopo esistono appositi programmi, 
pardon, persone!). 

Un buon sistema per avvicinarsi al 
linguaggio macchina consiste certa- 
mente nello studio approfondito di 
queste tabelle, una per ciascun tipo 
di indirizzamento possibile, a cui na- 
turalmente deve seguire un debito e- 
sercizio di modifica, ampliamento, 
fino ad arrivare al... primo program- 

La consultazione dei grafici non 
comporta pàrticolari difficoltà, ma è 
bene dare loro uno sguardo insieme. 

• Il primo “campo” in alto rappresen- 
ta i registri A. X e Y prima dell'esecu- 
zione dell'istruzione: se vi sono ri- 
portati alcuni valori, questi sono 
chiamati in causa nell'esecuzione 
dell'istruzione: altrimenti, se sono 
vuoti, non vuol dire che saranno po- 
sti a zero, ma solamente che il dato in 
essi contenuto non entra in ballo nel- 
la specifica istruzione. 

• Il secondo campo rappresenta la 
pagina zero, ovvero il segmento di 
memoria numerato da S00 a SFF: in 
questa “pagina" di memoria sono 
contenuti importanti puntatori e lo- 
cazioni. utilizzate dal Sistema Ope- 
rativo. che in questa sede non intc- 

E' importante sapere invece che al- 
cune locazioni (da SFB a $FE com- 
prese). utilizzabili dall'utente, sono 
di grandissima utilità per determina- 
te istruzioni. Naturalmente, per mo- 
tivi di spazio, non abbiamo rappre- 
sentato tutti i 256 byte che compon- 
gono la pagina zero, ma solo uno 


"spaccato" di essa, in cui sono indi- 
cati l'inizio ($00) c la fine (SFF); an- 
che in questo caso le locazioni vuote 
indicano semplicemente che non so- 
no utilizzate per questi esempi e pos- 
sono contenere un qualsiasi valore. 

• Il terzo campo, contrassegnato ge- 
nericamente con il termine "memo- 
ria". in realtà rappresenta solo un 
banco di 4K (40% byte) il cui uso è ri- 
servato appositamente per i micro- 
programmi in linguaggio macchina 
proposti nella stessa figura. 

La zona di memoria interessata 
non è alterabile da Basic (se non ri- 
correndo a POKE) c resiste anche al 
system reset (SYS 64738): i dati non si 
cancellano fino allo spegnimento del 
computer. In realtà la memoria di- 
sponibile parte da $0801 e va fino a 
$9FFF. oltre a questo banco da 
$€000 a $CFFF. ma. data la presenza 
del Basic, si rischia di cancellerc le 
nostre preziose routine per un non- 
nulla. a meno di spostare i puntatori 
di inizio o fine del Basic... troppo 
complicato. 

Alcuni problemi si possono incon- 
trare quando si utilizza un program- 
ma di Monitor che risiede proprio 
(guarda caso) in quei 4K a $COOO: un 
buon compromesso può essere l'uti- 
lizzo delle locazioni a partire da 
S8000 ( #32768). ma attenzione a non 
dimensionare vettori troppo lunghi 

Anche in questo caso abbiamo rap- 
presentato solo alcuni dei 40% bytes. 
evidenziando i primi e gli ultimi. A 
partire proprio da $C000 (#49152) 
sono allocate le istruzioni degli e- 
sempi. per cui. dopo avere caricalo, 
con delle POKE o con programmi 
monitor, tutti i registri e le locazioni 
usate con i valori previsti, digitando 
(SYS 49152) e verificando i registri, 
otterremo i risultati voluti. Come al 
solito, le locazioni vuote sono inin- 
fluenti ai fini della tabella. 

• Nel quarto campo sono finalmente 
contenuti i registri A. X e Y dopo l'e- 
secuzione dell'istruzione: rappresen- 
tando la situazione terminale dell'i- 
struzione stessa, servono per farci ca- 
pire l'operato di ciascun indirizza- 
mento. Ormai dovrebbe essere chia- 
ro. ma è bene ricordarlo, che sono ri- 
portati solo i valori dei registri intc- 
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Pagina zero Assoluto, X Assoluto, Y 

LDY $FC |A4 FC| l-DA SCFFB.X |BD FB CF| LDX SCFFC.Y |BF. FC CF| 





Accumulatore 

ASL |()A| 


Pag. zero, X Pag. zero, Y 

LDA SFB.X |B5 FB| LDX SFC.Y |B6 FC| 






Le routine grafiche 
di Danilo Toma 


PRESENTAZIONE 


Moni di voi, credo, avranno già sentito parlare delle routine granché pubblicate sul N. 14 di Commodore Compu- 
ter Club e magari avranno maledetto il mio nome quando venivano frustrati da errori di copiatura dell'immenso lista- 
to; prova ne sono le numerose c accorate telefonate ricevute da quando usci in edicola quel numero della 

In un paio di occasioni il mio telefono ha squillato minaccioso anche dopo la mezzanotte e mi sono sentito doman- 
dare se non avevo di meglio da fare che perseguitare poveri hobbisti proponendo loro listati così ponderosi: a tale 
punto arrivava la disperazione di qualche lettore. 

Voglio perciò in questa occasione, in cui vengono ripresentate le routine (integrate con altri utili comandi) illustrare 
le peripezie che mi hanno portato alla loro creazione così da indurvi in una maggiore condiscendenza nei miei 
confronti. 


La stona 

Era una notte buia e tempestosa 
quando portai alla Systems un Edi- 
tor di sprite che avevo realizzato e 
che de Simone trovò interessante. Gli 
consegnai allora anche una routine 
in linguaggio macchina che plottava 
punti nella pagina grafica. Il Grande 
Capo (!) però, preso da innumerevoli 
impegni, non trovava il tempo di esa- 
minarla: cosi, per allettarlo maggior- 
mente, realizzai un'estensione di tale 
routine che consentiva di tracciare li- 
nee oltre che punti. 

Fu un lavoro tremendo di messa a 
punto, dal momento che non dispo- 
nevo nemmeno di un assemblatore: 
facevo tutto “a mano" c se ci penso 
mi vengono i brividi. Alla fine però 
riuscii nell'intento e consegnai la 
nuova "releasc" che fu subito pubbli- 
cata sul n. 10 di C.C.C. 

I lettori di più lunga data ricorde- 


ranno ancora le speciali variabili in- 
tere. a cui assegnare i valori delle 
coordinate, che caratterizzavano quel- 
la versione. 

Pungolato dal successo ottenuto e. 
minacciato da de Simone volli mi- 
gliorare ancora il programma e per 
non sottrarre troppo tempo agli studi 
universitari decisi di portarmi il com- 
puter in vacanza. 

Fu una decisione tragica: mettersi 
davanti al computer in agosto, dentro 
una roulotte cotta dal sole, è il massi- 
mo del masochismo. Inoltre la mia 
ragazza non gradiva starsene da sola 
sulla spiaggia mentre io digitavo in- 
comprensibili numeri sull'amata- 
odiata tastiera e quindi fantozziani 
erano all'ordine del giorno. Ero giun- 
to al punto di desiderare il bruno 
tempo per avere una scusa plausibile 
per non uscire dalla caravan di 
mio fratello. 


Alla fine riuscii a terminare il pro- 
getto ma promisi a me stesso che non 
avrei mai più ripetuto una simile e- 
sperienza: dall'estate seguente avrei 
consacrato le vacanze al riposo por- 
tando solo un piccolo Ms/Dos... . 

Il resto della storia è noto: nel n.14 
di Commodore Computer Club ven- 
ne pubblicato quel sofferto lavoro e- 
stivo e... ricominciarono le sofferen- 
ze. questa volta telefoniche e da parte 
dei tenori. 

Da aggiungere solamente un'ulti- 
ma nota rivolta agli esperti di lin- 
guaggio macchina che esamineran- 
no i disassemblati commentati: ri- 
guardando le routine mi sono accor- 
to di alcune ingenuità, alcuni proble- 
mi che avrei potuto risolvere in modo 
più "brillante". Siate comprensivi, e- 
ra una calda estate... 
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Premessa 

Il criterio seguito nella stesura di 
queste pagine è quello di consentire, 
a chi già dispone del nucleo centrale 
delle routine grafiche (nella versione 
pubblicata sul n. 14 di C.C.C.). l'inse- 
rimcnto. senza difficoltà, delle istru- 
zioni di cui non dispone. Per tale mo- 
tivo si é preferito mantenere distinti i 
vari "moduli" del programma anzi- 
ché riunire i nuovi quindici comandi 
in un unico listato. 

Chi. invece, non sa nulla delle fa- 
migerate routine, non deve fare altro 
che seguire con attenzione i paragra- 
fi che seguono. 

Introduzione alla 
grafica del C/64 

Prima di parlare delle routine qui 
presentate, è opportuno introdurre 
alcune nozioni riguardo alla grafica 
del Commodore 64 poiché sul ma- 
nuale in dotazione non viene spiega- 
to nulla a tale riguardo, tranne una 
breve descrizione sul funzionamento 
degli sprite. 

Consigliamo, a chi volesse appro- 
fondire. alcuni degli articoli sulla 
grafica apparsi su Commodore Com- 
puter Club: 

• N.28: "La tua prima volta con la 
grafica del C/64" 

• N.30: “Tutti i caratteri del C/64" 

• N.32: “La gestione dei quattro ban- 
chi di memoria" 

• N.3S: 'Tutto sugli Sprite" 

Riassumiamo brevemente, comun- 
que. il funzionamento del C/64 in 
ambiente grafico. 

Quella che normalmente compare 
sullo schermo, la cosiddetta "Pagina 
Testo", non è altro che la visualizza- 
zione di 1000 byte della memoria 
(dalla locazione 1024 alla 2023). Ol- 
tre a questa il C/64 ha la possibilità di 
mostrare, agendo su opportune loca- 
zioni di memoria, una pagina (o 
mappa) grafica. 

Anche in questo caso viene visua- 
lizzata una parte della memoria, ma 
non si tratta più di 1000 byte bensì di 
WXKII E poiché ogni byte è formato da 


8 bit. il calcolo conduce al risultato di 
64000 hit. ai quali corrispondono sul- 
lo schermo altrettanti punti (nel mo- 
do standard) disposti in una matrice 
di dimensioni 320x200. 

Ogni singolo bit può essere posto, 
indipendentemente dagli altri, a T“ 
oppure a "0". determinando l'accen- 
sione o lo spegnimento del corri- 
spondente punto sullo schermo. Pur- 
toppo la corrispondenza bit/punto é 
piuttosto complicata: se definiamo 
con "I" la locazione inzialc della pa- 
gina grafica e con “X" e "Y" le coordi- 
nate del punto scelto, l'origine degli 
assi é posta in alto a sinistra: per sel- 
lare il punto, è dunque necessario 

L - l+320*INT(Y/8)+8*INT(X/8)+ 
YAND7 
:B 7-(XAND7): 
POKEL.PEEK(L)OR2*B 

La pagina grafica utilizzata nel- 
l'ambiente Toma si estende dalla lo- 
cazione 57344 alla locazione 65343. 
sfruttando gli 8K di RAM "celati" dal 
Sistema Operativo (Kcrnal). Ciò com- 
porta qualche piccola complicazione 
(di cui si parlerà più avanti) ma pre- 
senta il notevole vantaggio di non 
sottrarre spazio ai programmi. 

Il colore dei punti viene determina- 
to. nel modo grafico standard, dalle 
1000 locazioni della memoria di 
schermo (che. a tale scopo, viene spo- 
stata alle locazioni 52224-53223). 

Ogni locazione controlla il colore 
di un quadratino di 8x8 punti: i 4 bit 
più bassi della locazione determina- 
no il colore dei punti spenti (lo sfon- 
do). i 4 più alti il colore dei punti 

Ad esempio: 

PO KE52224. 1 6* A + B 

determina i colori dei primi 8x8 punti 
in alto a sinistra, mentre: 
POKE53223.l6*A+B 

i colori degli ultimi in basso a destra. 
Saranno di colore “A" i punti accesi c 
di colore "B" quelli spenti. Potete 
quindi scegliere, per ogni singolo 
punto, tra due soli colori ma potete 
cambiare a volontà tali colori per cia- 
scun blocco di 8*8 punti. 


Oltre al modo grafico standard esi- 
ste un'altra configurazione della pa- 
gina grafica (il modo multicolore) 
che permette di scegliere, per ogni 
punto, tra quattro colori anziché 

Questa più ampia scelta va a disca- 
pito della risoluzione orizzontale che 
passa da 320 a 160 punti (la metà). In 
pratica ogni punto diventa largo il 
doppio. 

Vediamo perché. La macchina, per 
sapere quale colore usare nel visua- 
lizzare un punto sullo schermo, con- 
trolla il bit corrispondente c agisce in 
base al valore di questo ma. come tut- 
ti i lettori dovrebbero sapere, un bit 
può assumere due soli valori: 0 oppu- 
re 1. Per avere quattro valori (c quindi 
quattro colori) bisogna prendere in 
considerazione una coppia di bit. Ta- 
le generica coppia può presentarsi in 
quattro configurazioni: 

Coppia tipo 0:00 
Coppia tipo 1:01 
Coppia tipo 2:10 
Coppia tipo 3:11 

Badate che questi sono numeri bi- 
narie corrispondono ai decimali 0: 1 : 
2: 3. a cui dora in poi sarà fatto riferi- 
mento per comodità. 

Col metodo descritto, dunque, i 
punti sono larghi il doppio dei punti 
"normali". Si viene allora a determi- 
nare una sovrapposizione-coinciden- 
za tra ogni punto di ascissa pari (2*n) 
e il punto di ascissa dispari (2*n+ 1) 
che lo segue. 

Ad esempio i punti di coordinate 
(5020) e (51.20) in modo Multicolore 
vengono considerati identici. 

Le informazioni sui colori da usare 
provengono, nel modo Multicolore, 
da tre fonti diverse: dalla locazione 
53281 quando la coppia di bit é la 0. 
dai quadro bit più alti della memoria 
di schermo (locazioni 52224-53223) 
per le coppie 1. dai quattro bit più 
bassi per le coppie 2. dalla memoria 
colore (locazioni 55296-56295) per le 
coppie 3. 

Vale lo stesso discorso del modo 
Standard per il cambio dei colori o- 
gni 8*8 punti, escluso il colore delle 
coppie 0(lo sfondo) che vale per l'in- 
tero schermo. 



La terza dimensione 

Certamente avrete tutti visto una fo- 
tografia e. osservandola, avrete rice- 
vuto l'impressione della cosiddetta 
"profondità". 

Alcuni soggetti sembrano più lon- 
tani ed altri più vicini. Nella fotogra- 
fia. in altre parole, un'immagine rea- 
le. tridimensionale, c stata ridotta ad 
un'immagine bidimensionale ma ha 
ugualmente conservato l'illusione 
della profondità. 

Si può ottenere lo stesso effetto sul- 
lo schermo grazie ad alcune formule 
matematiche, ed è esattamente ciò 
che simulano le routine di Toma. 

Basta assegnare le solite coordinate 
X e Y c in più aggiungere l'illusoria 
distanza dallo schermo. Z. a cui si 
trova il punto desiderato. 

Per familiarizzare con la nuova 
coordinata vi consigliamo di copiare, 
appena digitate le routine grafiche (c 
solo allora!) i semplici "demo" pre- 
senti in queste pagine. 

Comunque, se proprio non vi ci 
raccapezzate, basta assegnare sem- 
pre valore nullo alla coordinata Z per 
eliminare l'effetto prospettico. 


Caratteristiche generali 

Copiate con pazienza il primo pro- 
gramma (dal nome "Routine Grafi- 
che") con tutta l'attenzione e la pa- 
zienza necessarie. Molti accorgimen- 
ti sono stati introdotti, rispetto alla 
versione del N.14 di C.C.C. per limi- 
tare errori di digitazione. Prima di 
dare il RUN eseguite, ovviamente, u- 
na copia di sicurezza su disco o na- 
stro: in caso di malfunzionamenti 
non sarete costretti a ridigitare tut- 
to daccapo. 

I nuovi comandi non danno alcun 
problema di funzionamento se usati 
correttamente e sono ben tollerati dal 


"padrone di casa" a pane una sola 
eccezione da imputare, forse, ad una 
svista degli autori del Basic del C/64: 
dopo l'istruzione THEN eventuali 
nuovi comandi introdotti dall'utente 
non vengono riconosciuti. Perché ciò 
non accada, basta frapporre il carat- 
tere di doppio punto ( : ) tra THEN e il 
nuovo comando. 

Le nuove istruzioni vanno prece- 
dute dal carattere di "freccia a sini- 
stra ’. che si ottiene premendo il tasto 
snuato in alto a sinistra della ta- 

Pcr abilitare una nuova routine di 
interpretazione basta eseguire SYS 
51000 (ovviamente dopo aver carica- 
lo in memoria le routine). 

Vè anche una nuova routine di ge- 
stione degli errori che ha lo scopo di 
riportare il video al modo testo ogni 
volta che si verifica un errore oppure 
finisce un programma. Se volete che 
rimanga visualizzata la pagina grafi- 
ca fate terminare il programma con 
l'istruzione STOP oppure premete il 
tasto Ru n/Stop. 

In tal caso, per tornare alla pagina 
testo il modo più semplice è premere 
i due punti (:) e il tasto Return 


SYS 49724 

Vi ricordiamo che un eventuale 
software reset (SYS 64738) non can- 
cella assolutamente tali routine ma le 
disabilita soltanto. Non risulta dun- 
que necessario ricaricarle da nastro o 
disco. 

L’intervallo dei 
parametri 

I valori che si possono assegnare al- 
l'ascissa e all'ordinata sono compresi 
tra il numero negativo -32768 e il po- 
sitivo + 32767. Per la coordinata Z (la 
profondità) e per i raggi delle istru- 


zioni CIRCLE e ARC l'intervallo va- 
lido ètra 0 e + 32767. Al di fuori dei li- 
miti consentiti il programma si bloc- 
ca con 1'cmissione di un “Illegal 
quantity errar". 

La lunghezza massima di una linea 
non può eccedere i 32767 punti, altri- 
menti si verifica un overflow nei cal- 
coli e la linea risultante sarà "sbal- 
lata". 

L'origine degli assi, cioè il punto di 
coordinate (0.0.0). è posto al centro 
dello schermo. 

Vengono individuati con ordinata 
(Y) positiva i punti al di sopra dell'o- 
rigine e con ascissa (X) positiva quel- 
li alla sua destra. 

Nel caso in cui una figura da dise- 
gnare ecceda i bordi dello schermo, 
ne viene tracciata la sola parte visibi- 
le mentre, per i punti al di fuori, viene 
inibito il plottaggio (che invaderebbe 
aree di memoria pericolose). 

Il controllo di tracciabilità viene 
quindi effettuato su ogni singolo 
punto, c. se in termini di velocità ciò 
non viene notato con lince di 3CXMO0 
punti, risulta evidente quando, per u- 
na linea da 30000 punti, occorrono 
circa 5 secondi per completare l'ese- 
cuzione. 

Premere il tasto Rcstorc mentre il 
computer sta eseguendo un'opera- 
zione di tracciamento comporta l'in- 
chiodamento della macchina, se non 
avete aggiunto i pochi byte necessari 
a neutralizzare tale tasto (vedi dopo 
il paragrafo "Disabilita Usto resto- 
re"). Pertanto, se volete fermare un 
programmma. usate solo il tasto 
Run/Stop c. in seguito, il carattere di 
doppio punto (:) e il tasto Return. 

Durante il tracciamento, inoltre, 
l'orologio interno (quello che potete 
leggere con la variabile TIS) non vie- 
ne incrementato. 

Questi difetti sono dovuti al fatto 
che. per non rubare memoria ai pro- 
grammi in Basic, la pagina grafica 
(di 8K Ram) viene sistemata "sotto" il 
Sistema Operativo (dalla locazione 
57344 alla 65343) e questa "conviven- 
za" genera i piccoli inconvenienti 

Un ultimo avverti mento: la pressio- 
necontemporanea di Run/Stop e Re- 
ttore "sporca" la parte bassa della pa- 
gina grafica. 
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Opzione $ 

Per eseguire più velocemente le i- 
struzioni di tracciamento (PLOT. 
DRAW, ARC. CIRCLE) si possono, 
in alcuni casi, sostituire i parametri 
di tali comandi con il simbolo del 
dollaro ($). 

I parametri delle istruzioni citate, 
dopo essere stati valutati, sono con- 
servati in una zona di memoria da 
dove vengono successivamente pre- 
levati e utilizzati per l'esecuzione 
del comando. 

Se uno di questi parametri viene 
rimpiazzato con il simbolo allo- 
ra le routine "saltano" la valutazione 
e il parametro viene conservato: 
quando in seguito, nel prosieguo del- 
l'esecuzione. la routine preleva i va- 
lori dal "magazzino", trova il valore 
che era stato depositato con il co- 
mando precedente. 

Ad esempio se digitate (facendo, 
ovviamente precedere i comandi dal 
carattere di freccia a sinistra): 
COLORI: PLOT 10,5.0 
COLORO: f>LOTS.$.S 
vedrete che il punto di coordinate 
(10,5,0) verrà prima acceso e poi 
spento. 

L'uso dell' opzione "S" permette ri- 
sparmi di tempo tanto maggiori 
quanto più complesse sono le espres- 
sioni che dovrebbero, in caso contra- 
rio. essere eseguite. 

Attenzione che le locazioni del 
"magazzino " vengono utilizzate dal- 
le quattro istruzioni con alcune so- 
vrapposizioni: quindi, per evitare 
che l'output grafico sia diverso da 
quello previsto, usate quest'opzione 
solo se l'ultimo comando gralico 
(PLOT. DRAW. ARC. CIRCLE) era 
dello stesso tipo di quello con i dolla- 
ri ($). 

Ad esempio: 

CIRCLEO.0.0,50.50 

PLOT20.10.0 

CIRCLES.S.S.80.80 

In quest'ultimo caso il secondo cer- 
chio avrà come coordinate del centro 
quelle di PLOT e non quelle del cer- 
chio precedentemente tracciato. 

Sprite 

L'utilizzo degli sprite in pagina gra- 
fica richiede alcuni accorgimenti. 


Il processore video, infatti, gestisce 
solamente I6K di memoria c. quan- 
do c abilitato il modo gralico con 
GRAF oppure MG RAF. tali 16K 
partono dalla locazione 49152. 

Di conseguenza i dati degli sprite 
dovrebbero essere memorizzati a 
partire da tale locazione: da questa, 
però, sono allocate anche le istruzio- 
ni l.m. delle stesse routine grafiche! 

Inoltre le locazioni che indicano 
dove si trovano i dati di ogni sprite 
non sono più allocate in 2040-2047 
ma in 53240/53247. 

Per il resto (colori, coordinate, col- 
lisioni. eccetera) le locazioni di riferi- 
mento rimangono invariate. 

Ad esempio, se vogliamo disporre 
dello sprite 0 in pagina grafica, pos- 
siamo memorizzare i dati a partire 
dalla locazione 51712. che corrispon- 
de a 49152 + 40*64. quindi nella loca- 
zione 53240 metteremo il valore 40. 

Attenzione, comunque, a non inva- 
dere zone occupate dalle routine 
grafiche! 

Altro avvertimento: le locazioni 
53240/53247 vengono resettate ogni 
volta che vengono eseguiti GRAF e 
MGRAF quindi dopo tali istruzioni 
vanno "ri-pokati" i valori in tal modo 
cancellati. 

Le prime nove 
istruzioni 

Dopo aver digitato il primo blocco 
(programma "Routine Grafiche"), a- 
vete a disposizione nove istruzioni 
grafiche che. se avete digitato corret- 
tamente il programma, hanno una 
sintassi ben precisa. 

N.B. Tutti i comandi devono esser 
preceduti dal carattere di freccia a 
sinistra. 

CLEAR 

Sintassi: CLEAR 

Funzione: pulisce la pagina grafica 
(cioè pone tutti i bit a 0) 

GRAF 

sint: GRAF A.B 

funz.: fa passare al modo grafico 
Standard settando il colore A per lo 
sfondo e il colore B per i punti 


"A" e "B" rappresentano i codici 
dei colori e possono assumere valori 
compresi tra 0 c 15. 

MGRAF 

sint.: MGRAF A.B.C.D 
funz.: fa passare al modo grafico 
Multicolore settando il colore A per 
le coppie di bit 0 (lo sfondo), il colore 
B per le coppie 1. il colore C per le 
coppie 2. il colore D per le coppie 


TEXT 

sint.: TEXT A.B 

funz.: fa passare al modo testo settan- 
do il colore A per lo sfondo c il colore 
B per i caraneri. 

Tutti i caratteri presenti sullo scher- 
mo diventano del colore B. 

COLOR 
sint.: COLOR N 

funz.: determina con quale dei colori, 
definiti con le istruzioni GRAF o M- 
GRAF. vanno tracciati i punti. N può 
variare tra 0 e 3. Il valore N vale: 

0 per punti del col. A 

1 B 

2 " C 

3 “ D 


PLOT 

sint.: PLOT X.Y.Z 
funz.: setta il punto di coordinate 
(X.Y.Z). Il colore usato è quello speci- 
ficato dall'ultimo comando COLOR. 

X è la distanza orizzontale, misura- 
ta in punti-schermo, dal centro dello 
schermo (X assume valori positivi 
per i punti alla destra del centro). 

Y è la distanza verticale dal centro 
(assume valori positivi nella parte su- 
pcriore dello schermo) 

Z è la distanza del punto dallo 
schermo (profondità apparente). Può 
assumere solo valori non negativi. 


DRAW 

sint.: DRAWX1.Y1.Z1.X2.Y2Z2 
funz.: traccia una linea di estremi 
(X1.Y1.Z1) e (X2.YZZ2). Il colore u- 
sato è quello specificato dall'ultimo 
comando COLOR 


CIRCLE 

sint.: CIRCLE XY.Z.RXRY 
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funz.: traccia un'ellisse di centro 
(X.Y.Z). RX è II semiasse orizzontale. 
RY quello verticale. 

La circonferenza è un caso partico- 
lare dell' ellisse e si ottiene quando i 
due semiassi sono uguali (cioè 
RX=RY). 

Il risultato "estetico", non certo c- 
saltante di questo comando, è dovuto 
alla limitata risoluzione grafica del 
calcolatore. 


ARC 

sint.: ARC X.Y.Z.RX.RYA1.AF.P 
funz.: traccia archi d'ellisse (o di cir- 
conferenza) con centro (X.Y.Z) e se- 
miassi RX.RY. AI è l'angolo iniziale, 
da cui fare partire il tracciamento. 
AF è l'angolo finale. Tali angoli van- 
no espressi, come per le altre funzio- 
ni trigonometriche, in radianti. 

Prima di parlare dell'ultimo para- 
metro di ARC (cioè P) e delle grandi 
possibilità che offre, è necessario 
spiegare come lavora la routine che 
esegue CIRCLE e ARC. 

La risoluzione grafica del C/64, pur 
essendo già buona, è largamente in- 
sufficiente a rappresentare lince cur- 
ve in modo "gradevole". Perciò, fatti i 
debiti confronti, ci si è basati sulla 
constatazione che. con un poligono 
di un numero rilevante di lati (qua- 
ranta o più), si ottiene un effetto visi- 
vo che ha pochissimo da invidiare ad 
una circonferenza tracciata punto 
per punto, con il notevole vantaggio 
di una maggiore rapidità di esccu- 

E dal momento che già col metodo 
“poligonale" un'ellisse (o una circon- 
ferenza) di media grandezza viene 
tracciata in circa tre secondi, capirete 
che non vi sono stati dubbi nella scel- 
ta del sistema. 

Il tempo interminabile di traccia- 
mento è dovuto soprattutto al calcolo 
dei punti dell'ellisse, che richiede l'u- 
so delle funzioni seno e coseno. Per 
tali calcoli ci si è limitati ad utilizzare 
le routine originali del Sistema Ope- 
rativo che. per come sono strutturate, 
non risultano molto veloci. 

E veniamo al parametro “P". Que- 
sto indica ogni quanti radianti vanno 
calcolati i punti dell'ellisse che devo- 
no essere uniti con linee rette. P dun- 


que diminuisce alfaumentare del 
numero di lati del "poligono-ellisse”. 
Nel caso dell'istruzione CIRCLE tale 
valore è fisso ed è circa uguale a 
0.1 57; per essere più precisi è uguale a 
2*pigrcco/40, quindi le ellissi cosi ot- 
tenute sono in realtà poligoni di 40 
lati. 

Nel comando ARC. invece. “P" lo 
stabilisce l'utente. Ciò significa che 
oltre ai soliti archi potete fare dise- 
gnare poligoni con un numero qua- 
lunque di lati! E non solo poligoni, 
come si potrà notare facendo girare il 
programma dimostrativo dal nome 
"Poligoni Stelle ". 

Consiglio 

Dopo aver digitato, registrato, verifi- 
cato e lanciato (RUN) il primo bloc- 
co di programma ("Routine grafi- 
che"). potete digitare c far girare i 
programmi dimostrativi riportati fi- 
no al paragrafo "Neutralizzazione 
del tasto Restorc ". Se avete digitato 
correttamente le routine, dovrete no- 
tare la visualizzazione delle immagi- 
ni riportate in queste pagine. In caso 
contrario armatevi di pazienza c 
controllate riga per riga il listato: ave- 
te sicuramente sbagliato a digitare! 

Grafici di funzione 

Il semplice programma “Grafici di 
funzione" permette di visualizzare u- 
na qualsiasi funzione a patto di co- 
noscere. naturalmente, l'analisi mate- 
matica. 

Dopo il RUN comparirà un "me- 
nu" con due possibili scelte: cambio 
d'intervallo e cambio di funzione. 

Premendo il tasto 2 verrà visualiz- 
zata una scritta con le istruzioni da 
seguire e. al di sotto, verrà listata la li- 
nea 240 che contiene la funzione. Nel 
programma riportato la funzione è: 
240 DEF FNY(X)=SIN(X) 

Premendo il tasto 1. invece, verran- 
no chiesti gli estremi dell'intervallo 
in cui si desidera studiare la funzio- 
ne. L'ampiezza deli'ìnteryallo può 
variare a piacimento, cosi da consta- 
tare il comportamento delle funzioni 
più (intervallo ristretto) o meno (in- 
tervallo ampiqf in dettaglio. Provate 
ad inserire i valori: -3.14.+3.14. 


Dopo la pressione del tasto Return 
il programma calcolerà il massimo e 
il minimo della funzione nell'inter- 
vallo impostato. Si precisa che i due 
estremi, non essendo calcolati con il 
metodo delle derivate, non risultano 
molto precisi. 

Passati alcuni secondi in paziente 
attesa compariranno i due dati e. al 
di sotto, un'altra richiesta. 

Dovete comunicare al programma 
il fattore di moltiplicazione dei valori 
della funzione. Cioè dovete rispon- 
dere 1 per visualizzare la funzione in 
modo "normale". Rispondendo con 
numeri compresi tra 0 e 1 la funzione 
risulterà "schiacciata", mentre con 
numeri maggiori di 1 risulterà espan- 
sa in altezza. Rispondendo con 0. la 
funzione occuperà in altezza l'intero 
schermo. 

Dopo quest'ultima risposta verran- 
no tracciati gli assi, se visibili, e. final- 
mente. la funzione. 

Per tornare al menu si preme un ta- 
sto qualunque. 
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H listato 

100 REtl •*********••**•*••*• 

110 REM * • 

120 REd * ROUTINE GRAFICHE * 

130 REM * PER COnnODORE 64 * 

140 REM * DI DANILO TOMA • 

150 REM * • 

160 REM ***•*•*•**•*•**••*•* 

170 : 

100 PR INTCHRSC 147) ; SPCC252) "LET 
TURA DEI DATI” 

130 : 

200 FOR K-l TO 11: READ C,D,S:B- 
0 

210 FOR I-C TO D ; READ A:B-B+A:P 
OKE I , A : NEXT 

220 IF B<>S THEN PRINT”ERRORE N 
EL BLOCCO N . ” ; K : END 
230 NEXT 
240 : 

250 SYS51000 : SYS43724 
260 PR INTCHRSC 147 5 ; SPCC252 J ”CO(1 
ANDI ATTIUATI" 

200 : 

230 : 

1000 REM BLOCCO 1 ••• 

1010 : 

1020 DATA 43152,43351,20136 
1030 DATA 73,255,143,250,101,24 
3,73,255,143,243 
1040 DATA 246,243,200,2,246,250 
, 160,202, 162,255 

1050 DATA 36,162,3,103,214,2,14 
3,33,202,16 

1060 DATA 240,173,200,2,133,07, 

173,203,2,133 

1070 DATA 00,173,210,2,133,31,1 
33,70,173,211 

1000 DATA 2,133,32,133,73,36,23 
4,234,132,40 

1030 DATA 12,3,0,05,170,255,234 
,234,234,234 

1100 DATA 234,234,160,232,162,0 
,56,165,33,223 

1110 DATA 07,133,243,165,34,223 
,0B, 133,250, 16 

1120 DATA 3,32,0,132,140,55,133 
,142,53, 133 

1130 DATA 160,130,130,200,2,160 


,230,140,62,133 

1140 DATA 160,232,162,0,56,165, 

35.223.31.133 

1150 DATA 253,165,36,223,32,133 
,254,16,5, 162 

1160 DATA 4,32,0,132,140,106,13 

3.142.110.133 

1170 DATA 134,03,134,30,160,130 
, 130,200,2,160 

1100 DATA 230,140,113,133,160,5 
6,163,223,224,0 

1130 DATA 200,4,160,24,163,101, 
140,72,133,141 

1200 DATA 75,133,141,01,133,141 
,07, 133,141,33 

1210 DATA 133,163,234,141,115,1 
33,165,243,200,2 
1220 DATA 165,250,200,27,163,36 
,141,115,133,24 
1230 : 

1240 REn BLOCCO 2 ••• 

1250 : 

1260 DATA 43352,43551 .301B5 
1270 DATA 144,3,32,104,133,32,1 
41,133,165,70 

1200 DATA 137,35,200,244,165,73 
,137,36,200,240 

1230 DATA 36,230,243,200,2,230, 
250,230,253,200 

1300 DATA 2,230,254,163,0,133,2 

51.133.252.133 

1310 DATA 247,133,240,162,33,16 
5,247,56,223,243 
1320 DATA 160,165,240,223,250,1 
44,5,133,240,152 
1330 DATA 133,247,30,251,30,252 
,30,253,30,254 

1340 DATA 30,247,30,240,202,200 
,224,165,247,200 

1350 DATA 4,165,240,240,7,162,0 
,232,246,250 

1360 DATA 240,251,160,1,165,253 
,200,6,165,254 

1370 DATA 200,2,160,0,132,00,24 
, 144,11, 166 

1300 DATA 07,202,134,07,224, 255 
,203,2,130,00 

1330 DATA 165,31,133,70,165,32, 
133,73,24,165 

t contìnua pagina seguente) 
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1400 DATA 09,101,351,133,09,165 
,90,101,253,133 

1410 DATA 90,165,91,101,353,133 
,91 , 165,93, 101 

1420 DATA 354,133,93,33,141,193 
, 165,00,340,34 

1430 DATA 166.70,333,134,70,334 
,0,300,3,330 

1440 DATA 79,334,165.70.197,91, 
300,331,165,79 

1450 DATA 197,93,200,340,165,07 
, 197,93,300, 175 

1460 DATA 165,00,197,94,300,340 
,96,165,00,340 

1470 : 

1400 REM ••••• BLOCCO 3 ••• 

1490 : 

1500 DATA 49553,49751,37606 

1510 DATA 13,301,1,340,1,96,165 
,07,301,64 

1530 DATA 144,1,96,165,79,340,1 
,96,165,70 

1530 DATA 301,300,144,1,96,165, 
70,41,7,133 

1540 DATA 347,165,70,74,74,41,3 
54,160,105,335 

1550 DATA 193,56,339,347,133,34 
7,105,336,193,34 

1560 DATA 101,00,133,340,165,07 
,41,340,160,165 

1570 DATA 07,41,7,76,36,194,193 
,166,3,340 

1500 DATA 5,17,347,145,347,96,7 
3,355,49,347 

1590 DATA 145,347,96,130,64,33, 

16,0,4,3 

1600 DATA 1,7,354,199,353,135,3 
51,71,350,7 

1610 DATA 349,199,347,135,346,7 
1,345,7,344,199 

1630 DATA 343,135,341,71,340,7, 
339,199,337,135 

1630 DATA 336,71,335,7,334,199, 
333,135,331,71 

1640 DATA 330,7,339,199,337,135 
,336,71,335,7 

1650 DATA 334,334,334,334,334,2 
34,334,334,74,170 

1660 DATA 1B9, 50, 193,73,355,49, 
347,145,347,109 

1670 DATA 50,193,166,3,61,63,19 


3,17,347,145 

1600 DATA 347,96,169,71,141,0,3 
, 169,194, 141 

1690 DATA 1,3,96,134,354,169,33 
,45,17,300 

1700 DATA 340,9,169,14,133,351, 
169,6,33,307 
1710 : 

1730 REM *•••* BLOCCO 4 ••• 

1730 s 

1740 DATA 49753,49073,17109 
1750 DATA 190,166,354,40,3,76.5 
0, 164,76, 116 

1760 DATA 164,169,334,133,350,1 

69.0. 133.349.163 

1770 DATA 33,160,145,349,300,30 
0,351,230,250,202 
1700 DATA 30B, 346, 96, 169,304, 13 

3.350. 160.0. 133 

1790 DATA 349,165,351,10,10,10, 

10.133.353.165 

1000 DATA 353,41,15,34,101,353, 
163,4,145,349 

1010 DATA 300,300,351,330,350,3 

03.300.346.96.165 

1030 DATA 340,340,33,169,33,13, 
17,300,141,17 

1030 DATA 300,169,56,141,34,300 
,169,353,45,0 

1040 DATA 331,141,0,331,96,169, 
333,45, 17,300 

1050 DATA 141,17,300,169,31,141 
,34,300,169,3 

1060 DATA 13,0,331,141,0,331,16 
5,351,141,134 
1070 DATA 3,96 
1000 : 

1090 REM ••••• BLOCCO 5 **• 

1900 : 

1910 DATA 49900,50099,30003 
1930 DATA 169,0,133,97,133,99,3 
40,03,169,3 

1930 DATA 133,97,133,99,169,0,1 
33,90,340,13 

1940 DATA 169,1,133,97,169,0,13 
3,99,169,6 

1950 DATA 133,90,165,93,133,354 
, 165,94,133,355 
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I960 DATA 164,90,195,212,2,133, 
247, 1B5.213.2 

1970 DATA 133,240,169,0,133,81, 

32.131.195.165 

1900 DATA 253,133,93,165,254,13 

3.94.165.95.133 

1990 DATA 254,165,96,133,255,16 
9,1,133,81,32 

2000 DATA 141,195,165,253,133,9 
5,165,254,133,96 
2010 DATA 165,87,133,254,165,00 
, 133,255, 173,212 

2020 DATA 2,133,247,173,213,2,1 
33,248, 169,0 

2030 DATA 133,81,32,131,195,165 
,253,133,07,165 

2040 DATA 254,133,08,165,91,133 
,254,165,92, 133 

2050 DATA 255,169,1,133,81,32,1 
41,195,165,253 

2060 DATA 133,91,133,70,165,254 
,133,92,133,79 

2070 DATA 96,169,0,133,249,230, 
240,200,2,230 

2000 DATA 249,165,255,133,00,16 
,5, 162,5,32 

2090 DATA 0,192,169,0,133,253,1 

69.25.133.02 

2100 DATA 169,0,133,252,133,251 
, 133,250,56, 165 

2110 DATA 250,229,247,160,165,2 

51.229.240.170.165 
2120 : 

2130 REM *•••• BLOCCO 6 **• 

2140 : 

2150 DATA 50100,50109, 1297B 
2160 DATA 252,229,249,144,6.133 
,252,134,251,132 

2170 DATA 250,30,253,38,254,30, 
255,38,250,38 

2100 DATA 251,38,252,190,02,200 
,217, 165,80, 16 

2190 DATA 7,162,4,165,254,32,0, 
192,190,99 

2200 DATA 16,29,165,01,200,4,16 

9.160.208.2 

2210 DATA 169,100,24,101,253,13 
3,253,165,254,105 
2220 DATA 0,133,254,80,6,190,25 

4.169.255.133 

2230 DATA 253,96,13,190,32,190, 


57,199,66,190 

2240 DATA 99,194,170,198,202,19 
0,234,190,42, 199 
2250 : 

2260 REM ••••• BLOCCO 7 
2270 : 

2200 DATA 50215,50414,23966 
2290 DATA 162,4,189,223,2,157,1 
6B.2.202, 16 

2300 DATA 247,169,220,133,25,16 
9,2,133,26,76 

2310 DATA 104,196,160,2,169,160 
,32,162,107,32 

2320 DATA 107,226,160,2,169,183 
,32,40, 106,32 

2330 DATA 170,177,170,152,24,10 
9,190,2,141,203 

2340 DATA 2,130,109,191,2,141,2 

04.2.160.2 

2350 DATA 169,160,32,162,107,32 
, 100,226, 160,2 

2360 DATA 169,170,32,40,186,32, 
170,177, 170,152 

2370 DATA 24,109,180,2,141,201, 
2,138,109,189 

2300 DATA 2,141,202,2,96,169,0, 

141.168.2 

2390 DATA 141,169,2,141,170,2,1 
41,171,2,141 

2400 DATA 172,2,169,226,133,26, 
169,229, 133,25 

2410 DATA 169,126,141,173,2,169 
,32,141,174,2 

2420 DATA 169,217,141,175,2,169 
,123,141,176,2 

2430 DATA 169,197,141,177,2,32, 
21,192,32,244 

2440 DATA 194,164,93,165,94,32, 
145, 179, 162, 170 

2450 DATA 160,2,32,212,107,165, 

87.141.100.2 

2460 DATA 165,00,141,189,2,164, 
95, 165,96,32 

2470 DATA 145,179,162,103,160,2 
, 32,212, 1B7, 165 

2480 DATA 91,141,190,2,165,92,1 
41,191,2, 169 
2490 : . 

2500 REM * BLOCCO 0 ••• 
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2510 : 

2520 DATA 50415,50514,23197 
2530 DATA 0,133,101,32,61.196,1 
73,201,2, 141 

2540 DATA 135,2,173,202,2,141,1 
96,2,173,203 

2550 DATA 2,141,199.2,173,204,2 
,141,200,2 

2560 DATA 160.2.169,160.32,162, 

107. 160.2.169 

2570 DATA 173,32,103,104,160.2, 
162,160,32.212 

2500 DATA 107,165.25,164,26,32, 
31 , 100,201,255 

2530 DATA 240.14,163,1,133,101, 
160,4,177,25 

2600 DATA 153,160.2,136,16,240, 
32,61,136,162 

2610 DATA 3,103,135,2,143,07,20 
2, 16,246,165 

2620 DATA 91,133,70,165,92,133, 
79,32,94,197 

2630 DATA 32,72,192,32,109,197, 
165,101,240,152 

2640 DATA 36,169,254,45,14,220, 

141.14.220.169 

2650 DATA 253,37,1,133.1,96.169 
.2.5,1 

2660 DATA 133,1,169,1,13,14,220 
,141,14,220 

2670 DATA 96,162,36,130,160,0,2 
09,122,240,6 

2600 DATA 32,130,173,162,0.96,3 
2,115,0,96 

2690 DATA 32,124,197.224,36,240 
,9,32,170,177 

2700 DATA 140,200,2,141,209,2,3 

2,253,174,32 

2710 DATA 124,197,224,36,240,9, 
32,170,177,140 

2720 DATA 210,2,141,211,2,32,25 
3,174,32,124 
2730 : 

2740 REM •***• BLOCCO 9 ••• 

2750 : 

2760 DATA 50615,50014,24444 
2770 DATA 137,224,36,240,15,32, 
170,177, 170,16 

2700 DATA 3,76,72,170,140,212,2 
,141,213,2 


2730 DATA 36,32,253,174,32,124, 
137,224,36,240 

2000 DATA 3,32,170,177,140,214, 
2,141,215,2 

2010 DATA 32,253,174,32,124,137 
,224,36,240,9 

2020 DATA 32,170,177,140,216,2, 
141,217,2,96 

2030 DATA 32,253,174,32,124,197 
,224,36,240,15 

2040 DATA 32,170,177,170,16,3,7 
6,72,170,140 

2050 DATA 210,2,141,219,2,36,32 
,143,137,32 

2060 DATA 31,132,32,236,134,32, 
34,137,32,141 

2070 DATA 133.32,103,137,36,32, 
143,197,32,204 

2000 DATA 197,32,243,197,32,21, 
192,32,0, 195 

2090 DATA 32,94,197,32,72,132,3 
2,103,137,36 

2300 DATA 32,143,137,32,126,190 
,76,134,196,32 

2910 DATA 143,197,32,126,190,32 
,253,174,32,124 

2920 DATA 137,224,36,240,7,162, 

223. 160.2.32 

2330 DATA 212,107,32,253,174,32 
, 124,137,224,36 

2340 DATA 240,7,162,220,160,2,3 

2.212.107.32 

2350 DATA 253,174,32,124,197,22 
4,36,240,7,162 

2960 DATA 173,160,2,32,212,107, 

76.39.196.32 
2970 : 

2900 REH ••••• BLOCCO 10 
2990 : 

3000 DATA 50015,51014,27796 
3010 DATA 204,197,173,215,2,16, 
3,76,72,170 

3020 DATA 173,217,2,40,240,96,2 
34,234,32,150 

3030 DATA 103,224,16,40,3,76,72 
,170,134,252 

3040 DATA 32,253,174,32,150,103 
,224, 16, 1£. 241 

3050 DATA 134,251,96,32,145,190 
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,32,151,194,169 

3060 DATA 239,45,22,209,141,22, 
20B, 169, 170, 141 

3070 DATA 207,193,169,109,141,2 

09.193.169.227.141 

3090 DATA 209,193,76,161,194,32 
, 145,190, 165,252 

3090 DATA 141,33,200,169,216,13 

3.250. 160.0. 132 

3100 DATA 249,165,251,32,144,19 
4, 169,239,45,22 

3110 DATA 209,141,22,200,76,103 
, 194,32,145, 19B 

3120 DATA 165,252,141,33,200,16 

5.251.133.253.32 

3130 DATA 253,174,32,145,190,16 

9.216. 133.250. 160 

3140 DATA 0,132,249,165,251,32, 
144, 194,165,253 

3150 DATA 133,251,32,121,194,16 
9,16,13,22,200 

3160 DATA 141,22,200,169,76,141 
,207,193, 169,36 

3170 DATA 141,209,193,169,194,1 

41.209.193.76.161 

3100 DATA 194,32,150,103,224,4, 
4B , 3 , 76 , 72 

3190 DATA 170,134,2,96,234,169, 

67.141.0. 3 

3200 DATA 169,199,141,9,3,96,32 
,115,0,201 
3210 : 

3220 REfl BLOCCO 11 ••• 

3230 : 

3240 DATA 51015,51163,17772 
3250 DATA 95,240,6,32,121,0,76, 
231,167,169 

3260 DATA 0,133,249,165,122,133 
,252, 165, 123,133 

3270 DATA 253,160,0,240,20,165, 
252,133,122, 165 

32B0 DATA 253,133,123,230,249,1 
69 jlj) 197, 249, 240 
3290 DATA 210,200,202,200,252,1 

05.172. 199.170.32 

3300 DATA 115,0,133,254,200,105 
,172,199,197,254 

3310 DATA 200,219,202,200,240,6 
,249,166,249,109 

3320 DATA 252,195,141,63,3,232, 

109.252. 195.141 


3330 DATA 64,3,169,32,141,62,3, 

169,96,141 

3340 DATA 65,3,32,115,0,32,62,3 
,76, 174 

3350 DATA 167 , 4 , B0 , 76, 79 , 04 , 4 , 6 
0,02,65 

3360 DATA 07,6,67,73,02,67,76,6 
9,3,65 

3370 DATA 02,67,5,67,76,69,65,0 
2,4,71 

3300 DATA 02,65,70,4,04,69,00,0 
4,5,77 

3390 DATA 71,02,65,70,4,67,79,7 
6,176 

Esempi d’applicazione 

100 REM RAGGIERA *•** 

110 : 

120 -CLEAR : «-GRAFI 1 , 13 : A-l 

130 -COLOR A 

140 FOR 1-0 TO 2** STEP «/20 

150 X2-COSCn»110 

160 Y2-5INC I 1*100 

170 -DRAUI0 ,0,0, X2 , Y2 , 0 

100 NEXT 

190 A — C A-0) : GOTO 130 


100 REH **** POLIGONI *•** 

110 : 

120 -CLEAR : -GRAF5 , 1 
130 FOR L-3 TO 12 
140 -COLOR 1:-ARC0,0,0, 110, 100 
,*/L,w/L+«»2,2*ir/L 
150 FOR K-0 TO 1000: NEXT: REM 
•* PAUSA *• 

160 -COLOR 0 : -ARCI ,S,S,S,$,S,$ 

,S 

170 NEXT 
100 : 

190 REM STELLE 

200 : 

210 -CLEAR: -COL OR 1 
220 FOR L-.5*ir TO 2.5*« STEP «/ 
4 

230 -ARC0 ,0,0,110, 100 , L , L+4*ir 4 

•*/5 

240 FOR K-0 TO 1000: NEXT. REM 
•• PAUSA •• 

250 NEXT 
260 STOP 




110 : 

120 -CLEAR : -MGRAF1 1 ,1,13,5 
130 FOR 2-1B0 IO 0 STEP -3: -COL 
OR 1+2/61 

140 -ARC-120 ,0,2, 50 , 100 , w/4 , 2*w 
-w/4 , ir/2 
150 : 

160 -ARC-45, 36 , 2 , B5 , 36 , -w/2, w/2 
,*/3 

170 -ARC-45, -36, 2 , B5 , 36 , -ir/2 , ir/ 
2,w/3 

1B0 -DRAUI-45, 70,2, -45, -70, 2 
190 : 

200 -DRAUJ60 ,70,2,60, -70 , 2 
210 -ORAW150, 70,2, 150, -70,2 
220 -DRAW60, 70, 2, 105,25,2 
230 -DRAW150 ,70,2,105, 25 , 2 
300 NEXT 
500 STOP 



100 REFI •••• COSINUSOI DI 30 *• 
110 : 

120 -GRAF6, 1 : -CLEAR: -COLOR 1 
130 FOR 1—3** TO 3*w STEP 3**/ 
160 

140 X-I*160/*/3: Y-COS( I)*16-B4 
150 FOR 2-0 TO 500 STEP 100 
160 -PLOTX , Y+2/2 .5,2 
170 NEXT 
180 NEXT 

190 FOR 1—3** TO 3*ir STEP w/2 
200 X-I*160/w/3: Y-COS( I )*16-B4 
210 -DRAWX , Y , 0 , X , Y+200 , 500 
220 NEXT 

230 STOP 


100 REn •••• STELLA MULTICOL 

OR •••• 

110 : 

120 -CLEAR : -MGRAF0 , 7 , 6 , B 
130 FOR AI-w/2 TO 2.5*w-.001 ST 
EP w/2 

140 READ I ,K,C 

150 FOR J-I TO K STEP -1 

160 -COLOR C 

170 -ARC0.0.0, J*1 .2, J,AI ,AI+4*w 
, 4*w/5 

1B0 NEXT: NEXT 

190 DATA 100,65,1,75.65,2,95,6 
5,3,75,65,2 

200 POKE 19B , 0 : UIAIT 198,1: REM 
•• ATTENDE LA PRESSIONE DI 
UN TASTO 
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100 REM *** SPIRALE DI QUADRIL 
ATERI *** 

110 : 

1S0 -CLEAR: -GRAF6, 3: -COLOR 1 
130 FOR 1-0 TO 2*ir STEP it/ 40 
140 -ARC0.0, 1*1*80, 160, 100, I , 1+ 
5*« , i»/5 
150 NEXT 
160 STOP 



100 REM •••* FUNZIONE 3D •••• 
120 A— 3.5:B— A:H— SS:D-10:S-40 
:F-92:K-5 

130 DEF FNZ(U)-SIN(U)/U 
140 DIM AC320) : FOR 1-0 TO 320:A 
CI)— 3S9SS:NEXT 
150 -CLEAR: -COLOR 1:-GRAF11,5 
160 FOR Z-A TO B STEP CB-A)/S 
170 Z1-Z*Z+ .0001 : Z2-INTC CZ-A)*D 
) 

1B0 Z3-256/ (Z2+256) : X1--160: H-H 
+K 

1S0 FOR X-A TO B STEP CB-A)/31S 

200 Y-FNZC X*X+Z1 ) : X2-X1*Z3+160 

210 Yl-C Y*F+H)*Z3 

220 IF YKACX2) THEN 250 

230 ACX21-Y1 

240 -PL0TX1.Y1/Z3.Z2 

250 Xl-Xl+1: NEXT: NEXT 



100 REM *•• IN MOUI MENTO NEL T 
UNNEL *•• 

110 : 

120 -MGRAF0, 0,0, 13: -CLEAR : POKE 
53280,11 

130 L— 70: Z— 1200: Y— 98 
140 FOR 1-0 TO 3 
150 FOR C-l TO 3: -COLOR C:Z-Z- 
100 

160 FOR X— 155 TO 155 STEP 310 
170 -DRAUX , Y , Z , X , Y-200 , Z 
180 -DRAUS,S,Z+L,S,S,Z+L 
190 -DRAUS, Y-200, S.S.S.Z 
200 -DRAUJ0 , S , S , 0 , S , S 
210 NEXT 

220 FOR X— 155 TO 85 STEP 80 
230 -DRAUX, Y,Z,X+L,Y,Z 
240 -DRAUS , S , Z*L , S , S , Z+L 
250 -DRAUX+L , S , Z , S , $ , $ 

260 -DRAUX, S.S.X.S.S 
270 NEXTX.C, I 
2B0 : 

290 A— 100 ; B— 0 : S — 4: REM •• UIA 

300 FOR 1-1 TO 3 
310 FOR T-A TO B STEP S 
320 FOR C-l TO 3 
330 -MGRAF0, 13,0,0 
340 FOR J-0 TO T : NEXT 
350 -MGRAF0.0, 13,0 
360 FOR J-0 TO T : NEXT 
370 -MGRAF0 ,0,0,13 
380 FOR J-0 TO T : NEXT 
390 NEXTC.T 

400 IF 1-1 THEN A-0 : B-l : S- . 1 
410 IF 1-2 THEN A-0 : B-100 : S-10 
420 NEXTI 
430 GOTO 290 


100 REM ••• CUBO NELLO SPAZ 

IO ••• 

110 : 

120 REM ••• L-LATO X-POSIZ. 0 
RIZZONTALE Y-POSIZ. UERTIC 
ALE Z-DISTANZA *•• 

130 REM ••• X , Y , Z SI RIFERISCO 
NO ALLO SPIGOLO IN ALTO A S 
INISTRA ••* 

140 REM •*• PIU’ "UIC INO" ALLO 
SCHERMO ••* 

150 : 

160 AS-”CD0UNH5 RI GHTD “ : -TEXT6 


- Commodore 


170 PRINT”CCLEAR3 ”A$; A$”CRUS3 C 
UBO NELLO SPAZIO " 

100 PRINTAS"C3 DOUIN3PER SPOSTAR 
E IL CUBO SU, GIU’" 

190 PRINTAS-'A DESTRA E A SINIST 
RA" 

E00 PRI NT AS "USARE I TASTI DEL C 
URSORE” 

210 PRINTA$"CDOUJN3PER ALLONTANA 
RLO E AUUICINARLO" 

220 PRINTA$"USARE I TASTI - E 4 

230 PRINTA5; AI-CDOUNDCRUS: PREN 
ERE UN TASTO ” 

240 GET AS : I F A$-“" THEN 240 
250 : 

260 -CLEAR:-GRAF0,1: -COLOR 1 
270 POKE 650,120 
200 L-200: X-170: Y— 75 :2-500 
290 : 

300 FOR Yl-Y TO Y-L STEP -L 
310 -DRAUJX ,Y1,Z,X+L,Y1,Z 
320 -DRAWS , $ , Z+L , $ , $ , Z+L 
330 -DRAUJX+L , $ , Z , $ , S , $ 

340 -DRAUJX , $ , 2 , X , $ , $ 

350 NEXT 

360 FOR Zl-Z TO Z+L STEP L 
370 -DRAUJX, Y, ZI, X, Y-L, ZI 
3B0 -DRAUIX+L,$,$,X+L,$,$ 

390 NEXT 
400 : 

410 POKE 190 , 0 : UIAIT 190,1: GET A 
$ 

420 IF AS-”-” THEN Z-Z+100 
430 IF A$-”+” AND Z>99 THEN Z-Z 
-100 

440 IF A$-”CUP3" THEN Y-Y+50 
450 IF A$-"tDOUIN3" THEN Y-Y-50 
460 IF A$-"CRIGHT3” THEN X-X+50 
470 IF A$-"CLEFT3" THEN X-X-50 




100 REN •*** PAESAGGIO 
110 : 

120 POKE 53200, 11 : -CLEAR: -NGRAF 
13,9,7,14 

130 -COLOR 3: FOR Y-0 TO 100: -D 
RAU-160 , Y , 0 , 160 , Y , 0 : NEXT : RE 
M *• CIELO 
140 : 

150 -COLOR 2: FOR R-13 TO 2 STE 
P -1 : -CI RCLE-100 , 05 , 0 , R*1 .2 
,R: NEXT: REM •• SOLE 
160 FOR I-tr/2 TO 2 . 4*ir STEP ir/0 
170 Y-SINCn»32+05:X-COSCn*43- 
100 

100 -DRALI-100 , 05 , 0 , X , Y , 0 
190 NEXT: REN •• RAGGI 
200 : 

210 -COLOR 1:A— 150: B-A 
220 N-2*INTC15+15*RNDC1)) 

230 FOR Y-N TO 0 STEP -2:A-A-2* 
RNDC 1 )-l : B”B+2*RNDC 1 )+l 
240 -DRAUIA , Y , 0 , B , Y , 0 : NEXT 
250 IF B< 100 THEN A-B+RNDC 1 )*10 
: B-A: GOTO 220: REN *• NONTI 
260 : 

270 -COLOR l:FOR X— 150 TO 90 
STEP 2 ; -DRAUJX , -100 , 32000 , X , 
-100 , 0 : NEXT : REN ** STRADA 
200 : 

290 FOR Z-000 TO 200 STEP -600 
300 -COLOR 1 : FOR X-130 TO 160 
STEP 2: -DRAUJX, -100, Z,X, 100, 
Z : NEXT 

310 S— 4 : I F Z-200 THEN S — 1.7 
320 -COLOR 0:FOR R-50 TO 1 STE 
P S: -CIRCLE145 ,112,Z,R*1.7, 
R : NEXT 

330 NEXT: REN ** ALBERI 
340 POKE 190 , 0 : UAIT 190,1: REN 
*• ATTENDE TASTO PRENUTO 




100 REM **** CHIOCCIOLA **** 
110 : 

120 «-GRAFI 1,7: .-COLOR 1 : «-CLEAR 
130 FOR 1-2 . 5*ir TO 0 5TEP -w/10 

140 x-coscn*ce0-i*n-40 
150 Y-SINCn*(70-I*n-24 
160 ►C I RCLEX , Y , I * I *25 , 00 , 74 
170 NEXT 
100 STOP 


100 REM *** FARFALLA MULTICOLO 

R *•* 

110 : 

120 «-MGRAF6 ,1,10,0: ►CLEAR 
130 ►COLOR 1 
140 FOR 1-2 TO 5 STEP 3 
150 ►CI RCLE0 ,0,0, I ,40 
160 NEXT 

170 ►ORAUI0, 40, 0,-20, 60,0 



110 : 

120 ►CLEAR : ►COLOR 1 : ►GRAFO , 1 
130 FOR Yl— 00 TO 00 STEP 40 
140 FOR X— 100 TO 100 
150 X-RND(25*20+30+X: Y-Y1+RNDC0 

5*20-10 

160 AI-RNDC 1 5*2; U-RNDC 1 5*5+5 
170 FOR 1-1 TO U 
100 ►ARCX ,Y, 0,1,1, AI, AI +4*w, 4*ir 
/5 

130 NEXTI , X , Yl 
200 STOP 


* * * * 

* * * * * 

★ * * * * * * 

* * * * * * * 


130 A-100 

20fc FOR 1-0 TO A* . 0 STEP 2 
210' ►COLIOR RNOC05*3+1 
220 ►DRAUJ I-A ,1 -A, 0,-1, 1,0 
230 ►DRAUJ A-I , I - A , 0 , 1,1,0 
240 NEXT 

250 FOR 1-0 TO 4000: NEXT 
260 RUN 



100 REM *** FARFALLA MULTICOLO 

R ••* 

110 : 

120 ►MGRAFB, 1,10,0: ►CLEAR 
130 ►COLOR 1 
140 FOR 1-2 TO 0 STEP 3 
150 ►CI RCLE0 ,0,0,1,70 
160 NEXT 

170 ►DRAUJ-30 ,30,0,0, 70 , 0 
100 ►DRAUJ30 , 30 , 0 , 0 , 70,0 
130 : 

200 FOR I — . 05*w TO 0 STEP n/00 

210 X-I*45: Y-SINC 15*33 

220 ►COLOR RNOC05*3+1 

230 FOR K — 1 TO 1 STEP 2 

240 ►DRAUI0, 0,0, X*K, Y*K, 0 

250 ►DRAW35*K,-30,0,-X*K, Y*K , 0 

260 ►DRAUI0 ,0,0, X*K , -Y*K , 0 

270 ►DRAUI35*K , -30 , 0 , -X*K , -Y*K , 0 

2B0 NEXTK, I 
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590 FOR 1-0 IO 5000 : NEXT 
300 RUN 



100 REM •••* RAGNATELA ••*• 

110 : 

150 «-GRAFI 1 , 1 3 : -CLEAR : «-COLOR 1 

130 L-100:N-16 

140 FOR J-0 IO N-l 

150 FOR 1-0 TO J-l 

160 A-5/N*ir 

170 Xl-L*COSCA*J) : Y1-L*SINCA*J) 
1B0 XS-L*COSCA*I):YS-L*SIN(A*I) 
190 -DRAUIX 1 , Y1 , 0 , X5 , Y5, 0 
500 NEXTI.J 

510 STOP 

100 REM ***• SPIRALI **•* 

110 : 

150 -GRAF11, 13 :-CLEAR: -COLOR 1 
130 FOR I--it TO ir STEP ir/60 
140 X1-100*COSCI/E) : Y1-100*SINC 
1*5) 

150 X5-100*COS( 1*5) : Y5-100*SINC 
1 / 5 ) 

160 -DRAUJX1 , Y1 , 0, X5, YB, 0 
170 NEXT 

1B0 STOP 

100 REM ••• DEMO TERZA DIMENS 
IONE ••• 

110 : 

150 -CLEAR: -GRAFI 1 ,0: -COLOR 1 
130 FOR Z-0 TO 1800 STEP 300 
140 -ARC0 , 0 , Z , 500 , 100 , - . 55*», 1 . 

B5*ir, ir/5 
150 NEXT 

160 FOR X— 140 TO 140 
170 -DRAUIX, -71 .0.X, -71,1600 
1B0 NEXT 

190 STOP 


100 REM •• QUADRAT0 CHE SI ALL 
ONTANA •• 

110 : 

150 REM ••* L-LATO X-POSIZ. 0 
RIZZONTALE Y-POSIZ. UERTIC 
ALE Z-DISTANZA ••• 

130 : 

140 -GRAFI 1 , 3: -COLOR 1 
150 L — 1 00 : Y— - 100 
160 X-RNDC0) *300-500 
170 : 

180 FOR Z-0 TO 5000 STEP 100 
190 -CLEAR 

500 -DRAUIX, Y.Z.X-L.Y.Z 
510 -DRAUIS , I , Z-L , I , I , Z+L 
550 -DRAUX+L , $ , Z , S , $ , $ 

530 -DRAUJX , I , Z , X , I , I 
540 NEXT 
550 GOTO 160 


100 REM ••• GRAFICI DI FUNZION 

E •** 

110 : 

150 POKE 53580,6 
130 PRINT "CCLEAR3C 10 RIGHT3CRUS 
3 GRAFICI DI FUNZ I ONEC RUOFF 3 

140 PRINTSPCC517) "PREMI ” : PRINTS 
PCC86) "CRUS31CRUOFF3 PER SC 
EGLI ERE L 1 INTERUALLO" 

150 PRINTSPCC46) “CRUS35CRUOFF3 
PER CAMBIARE FUNZIONE" 

160 GET AI : ON UAL (AI) GOTO 510,1 
B0 

170 GOTO 160 

180 PRI NT" CCLEAR3 MODIFICA LA SE 
GUENTE LINEA" 

190 PR I NT ” C DOWN 3 PO I DAI IL RUNC 
3 DOWN3" 

500 LIST 540 

510 INPUT "CCLEAR3C3 DOUNJCRUSD 
ESTREMI DELL’ INTERUALLOCR 
UOFF3 ” ; A , B 
550 M-99999 : L--M 
530 S-CB-A)/319 
540 DEF FNY(X)-SINCX) 

550 FOR X-A TO B STEP S:Y-FNYCX 
) 

560 IF Y>L THEN L-Y 
570 IF Y<M THEN M-Y 
580 NEXT 

590 PRINT ”C6 OOUIN3CRUS3 MASSIMO 
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DELL' INTERUALLOC RUOFF3 " ; L 
300 PRINT-C2 DQUJN] C RUS3 MINIMO 
DELL* INTERVALLO CRVOFFD**;M 
310 INPUT "C2 DOUINHRUS3 SCALA 
DI Y CRUOFFD " 

; P 

350 IF POH THEN Pl-S/P 
330 T-CL-M1/S/199: IF P-0 THEN P 
-T:P1-S»P 

340 -CLEAR:-GRAF6,3:-C0L0R 1 
350 IF M>0 THEN E— M/S-100 
360 IF L<0 THEN E— L/S+100 
370 IF M*L<-.01 THEN GOSUB 460 
300 IF A*B<-0 THEN GOSUB 490 
390 I -- 160 : FOR X-A TO B STEP S: 
Y-E+FNYCXJ/Pl: IF Y>100 OR Y 


100 REM FIORE 

110 : 

150 «-CLEAR : «-MGRAF7 ,4,2,0 
140 FOR N-4 TO 1 STEP -1 
150 FOR 1-0 TO S*n- .01 STEP ir/2 
/N 

160 X-C0S(I)»23»(N-1) 

170 Y-SINC I )*23*CN-1 ) 

100 FOR A-10 TO 30: -COLOR A/10 
190 -ARCX, Y.0.A, A, I -ir/ 1 .5, I+ir/1 
.5,2*«/10 
500 NEXTA, I ,N 
400 UJAIT 190,1 




Neutralizzazione del 
tasto Restore 

Come già spiegato nel paragrafo ri- 
guardante le caraneristiche generali 
delle routine, il tasto Restore provoca 
catastrofici effetti se viene premuto 
mentre è disabilitato il Sistema Ope- 
rativo (quindi mentre è in esecuzione 
un'istruzione di tracciamento come 
DRAW. ARC. e cosi via). Si oniene 
infatti il blocco del computer, rime- 
diabile solo con lo spegnimento. 

Quest'inconveniente può essere 
fonte di grosse arrabbiature, soprat- 
tutto per i più distratti, perciò vi farà 
piacere poterlo eliminare. 

Il tasto maledetto 

Vediamo di capire come funziona 
il temibile tasto. 

Quando premiamo Restore provo- 
chiamo un NMI. vale a dire un inter- 
rupt non mascherabile. che per il no- 
stro microprocessore rappresenta 
“un ordine tassativo” (gli esperti di e- 
lettronica perdonino la terminologia 
poco ortodossa) che non può rifiutar- 
si di "ascoltare". 

Perciò interrompe qualunque cosa 
stia facendo e si precipita ad eseguire 
la routine di NMI del Sistema Opera- 
tivo. il cui indirizzo è contenuto nelle 
locazioni FFFA e FFFB (valori esa- 
decimali corrispondenti ai decimali 
65530 e 65531). 

Questa prevede il test del tasto 
Run/Stop. Se. al momento della veri- 
fica. risulta premuto, avremo come 
effetto alcune riinizializzazioni: del- 
le periferiche, dei vettori principali e 
dello stack: subito dopo comparirà la 
solita scritta READY nella parte alta 
dello schermo. 

Se invece il tasto Run/Stop non è 
premuto, il microprocessore tornerà 
ad occuparsi di ciò che stava facendo 


prima deH'intemizione. con l'unica 
conseguenza di avere “perso" alcuni 
microsecondi. 

Con le routine di Toma. però, du- 
rante il tracciamento viene disabili- 
tata la ROM che contiene il Sistema 
Operativo e quindi dalla locazione 
E000 (decimale 57344) alla FFFF 
(decimale 65535) il microprocessore 
trova solo memoria RAM 

Quando, pertanto, in seguito alla 
pressione del tasto Restore. cerca 
l'indirizzo della routine di NMI... 
non trova ciò che cerca e va in tilt. 

Disabilitare il tasto Run/Stop è i- 
nutile (poiché sarebbe come "chiu- 
dere la stalla dopo che i buoi sono 
scappati"). 

La soluzione comunque è molto 
semplice: basta creare una routine di 
NMI "alternativa" in una zona sicu- 
ra e mettere nelle locazioni (della 
RAM) FFFA e FFFB l'indirizzo di 
tale routine. 

Cosi anche nel caso in cui il Siste- 
ma Operativo sia momentaneamen- 
te "assente", il microprocessore saprà 
dove andare e cosa fare. 

La nuova routine di NMI creatai il 
misamo delta sempUàta E' formata 
da una sola istruzione in linguaggio 
macchina: RTI che. per i profani, si- 
gnifica "ritorno da intemipt". 

Ciò significa che ogni richiesta di 
NMI attiva la solita procedura ma 
non provoca nessuna conseguenza, 
anche se il tasto STOP è stato premu- 
to. perchè al microprocessore viene 
subito imposto di tornare alla sua at- 
tività ante-interrupt. 

L'unico effetto è la solita perdita di 
microsecondi per effettuare i vari 
salti. 

La “procedura alternativa" qui de- 
scritta viene seguita SOLAMENTE 
quando la ROM del Sistema Opera- 
tivo è disabilitata. Non si ha perciò 
nessuna modifica nella funzione del 


tasto Restore al di fuori del caso 

Le modifiche da 
apportare 

Il lavoro da compiere per una mo- 
difica di tale importanza è decisa- 
mente leggero: basta infatti inserire 
le lince 10000-10200 (vedi program- 
ma: "Disabilita Restore") in fondo al 
listato delle routine grafiche che ave- 
te già digitato. La numerazione, in- 
fatti. consente l'accodamcnto del 
nuovo blocco di righe Basic. 

Le tre POKE modificano la routine 
di disabilitazione del Sistema Opera- 
tivo quindi vanno effettuate DOPO 
avere letto c memorizzalo le routine 
grafiche, altrimenti non si avrà alcun 
effetto. 

Per tale motivo nel listato devono 
assolutamente essere poste in modo 
da essere eseguite dopo la lettura dei 
DATA delle già citate routine. 

Aggiungendo le poche righe di pro- 
gramma Basic al gruppo di righe del 
listato "Routine Grafiche" si eviterà, 
ad ogni buon conto, ogni perplessità 



9940 REM ••••*••••••••••••••••• 

9950 REM • • 

9960 REM • DISABILITA RESTORE • 
9970 REM * * 

99B0 REM *•***••••••••••••••••• 

9990 : 


10000 FOR I-49B74 TO 49BB7 : READ A 
: POKE I , A : NEXT 

10010 DATA 133,1,169,523,141,550 
, 255 ,169,194,141,251, 255 , 96 
, 64 

10020 POKE 50539,76: POKE 50539,21 
0:POKE 50540,194 
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Comandi per il 
salvataggio/ caricamento 
della pagina grafica 

Vediamo ora quadro istruzioni che 
si aggiungono alle nove prima siste e 
che saranno senz'altro utili a molti 
"artisti". Infatti salvare su nastro (o 
su disco) i propri "capolavori", dise- 
gnati con le routine grafiche, risulta 
molto difficile per tutti coloro che 
non conoscono approfonditamente 
il Sistema Operativo e la configura- 
zione di memoria del nostro C/64. 

Effettivamente, dal momento che 
la pagina grafica è situata in una po- 
sizione particolarmente inaccessibi- 
le. l'operazione presenta alcune diffi- 
coltà da superare. 

Salvare direttamente tramite i nor- 
mali comandi Basic (OPEN oppure 
SAVE usato nel modo atto a salvare il 
contenuto di una zona di memoria 
da voi scelta) non è possibile. Infadi 
la pagina grafica condivide la pro- 
pria "casa" con il Sistema Operativo 
c quando cercate di leggere (con 
PEEK oppure, caso nostro, tramite 
SAVE) il contenuto delle locazioni in 
questione coincide con il Sistema O- 
pcrativo stesso. Quindi il valore "pee- 
kato" non ha niente a che vedere con 
il contenuto dalla pagina grafica che 

Stranamente (ma non troppo) l'o- 
perazione inversa, vale a dire POKE. 
non presenta inconvenienti di sorta 
perchè la POKE è sempre diretta alla 
R.A.M. (quindi alla pagina grafica) 
anche se "sopra" di essa è presente u- 
na ROM (il Sistema Operativo). 

Ecco dunque la necessità di ricorre- 
re ad una routine in linguaggio mac- 
china che "tolga di mezzo" tempora- 
neamente il Sistema Operativo e ren- 
da "visibile", in fase di lettura, la pa- 
gina grafica. 

Ma se il Sistema Operativo viene 
disabilitato non è più possibile utiliz- 
zarne le comode routine dedicate al- 
la comunicazione con le periferiche: 
risolto un problema ecco dunque che 
se ne presenta subito un altro! 

Le soluzioni sono due: o si riscrivo- 
no. con le opportune modifiche, le 
preziose routine di I/O (ci vengono i 
brividi solo a pensarlo) oppure si tra- 
sferisce il contenuto della pagina gra- 


fica in una zona più accessibile e si 
riabilita il Sistema Operativo. Esclu- 
sa. per motivi morali, la soluzione 
masochista, si è optato per la seconda 
soluzione. 

Ma dove trasferire 8K(circa)di me- 
moria senza rischiare di invadere lo 
spazio riservato ai programmi in Ba- 
sic? Naturalmente (!) sotto la R.O.M 
dell'interprete Basic. 

Questa è "mappata" dalla locazio- 
ne 40960 alla locazione 49151 e non 
interviene nelle operazioni di I/O. 
Può quindi venire disabilitata senza 
importanti conseguenze. Questo tra- 
sferimento della pagina ha permes- 
so. inoltre, di realizzare l'istruzione 
GRMERGE (vedi dopo) che sicura- 
mente vi farà comodo. 

Quattro nuovi comandi 

Ricordiamo che anche questi co- 
mandi vanno preceduti dal solito ca- 
rattere di freccia a sinistra. 

GRSAVE 

La sintassi dei parametri è identica 
a quella del SAVE "normale". Esem- 

P GRSAVE 

GRSAVE"nome" 

GRSAVE"nomc".n 

(n = numero di periferica) 

La pagina grafica viene salvata co- 
me un normale file programma 
(PRG). 

Questa, come le altre istruzioni, 
funzionano sia con il registratore 
(n = I) che con il disk drive (n~8). 


GRLOAD 

Sintassi dei parametri identica al 
LOAD normale. Esempio: 
GRLOAD 
GRLOAD'nome" 
GRLOAD'nome' .n 
GRLOAD'nome'.n.l 
L'indirizzo secondario non è ne- 
cessario in quanto la pagina grafica 
caricata con questa istruzione viene 
SEMPRE messa negli ultimi 8K di 
memoria Ram. 

E‘ ovvio che eventuali disegni pre- 
senti nella pagina al momento del 
GRLOAD vengono irrimediabil- 
mente cancellati. 


GRVERIFY 

Sintassi dei parametri identica al 
VERIFY normale. Esempio: 
GRVERIFY 
GRVERIFY" nome" 

GRVERIFY" nome".n 
La verifica non viene effettuata 
comparando la registrazione con la 
pagina grafica "normale ", ma con la 
sua immagine trasferita nelle loca- 
zioni 40960-48959. Immagine che ri- 
mane invariata fino al prossimo GR- 
SAVE o GRLOAD 

GRMERGE 

Sintassi dei parametri identica al 
LOAD. Esempio: 

GRMERGE 
GRMERGE'nome" 
GRMERGE'nome'.n 
GRMERGE'nome'.n.l 
Stesse considerazioni di GRLOAD 
riguardo l'indirizzo secondario. 

Questa istruzione consente di cari- 
care dalla memoria di massa la pagi- 
na grafica e di sovrapporla a quella 
già presente nella memoria del calco- 
latore SENZA CANCELLARE quan- 
to è già presente nella pagina grafica 
al momento del caricamento. Si ha 
cioè la possibilità di fondere le due 
pagine: quella residente e quella 

Effetti collaterali 

Se usate il registratore e premete il 
tasto Run/Stop quando compare la 
scritta "PRESS PLAY . " non succede 
nulla. Per fermare l'operazione dove- 
te premere anche il tasto Rcstore. 

Gli altri piccoli inconvenienti se- 
gnalati nel numero 17 di Commodo- 
re ComputerClub sono stati elimina- 
ti in questa nuova versione grazie al- 
l'aggiunta di due istruzioni: PHA e 
PLA. nella routine di riabilitazione 
del Basic. 

Importante: nella frazione di se- 
condo in cui t disabilitato il Sistema 
Operativo (con GRSAVE subito do- 
po che premete il tasto Return, con 
GRLOAD e GRMERGE alla fine 
del caricamento) non premete asso- 
lutamente il tasto Restore se non ave- 
te provveduto ad aggiungere alle rou- 
tine grafiche la routine che lo disabi- 
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lita, perche otterreste il blocco del 
computer. 

Se avete provveduto ad aggiungere 
le poche righe di "Disabilita Restore" 
al corpo principale del programma, 
non avrete, però, nulla da temere. 

Il listato 

Per disporre delle quattro nuove i- 
struzioni agite in questo modo: 


1: Caricate le routine grafiche (alle 
quali avete "appeso" il programma 
"Disabilita Restore"). 

2: Digitate quindi il listato "Load/ 
Save della pagina grafica", registrate 
e verificate. 

3: Date il RUN. 

4: Verificate il corretto funziona- 
mento disegnando qualcosa in Hi- 
Res e. in seguito, registrando e cari- 


cando la pagina grafica servendosi 
dei nuovi comandi. 

La locazione S10S1 (riga 1 5350) in- 
dica il numero di nuovi comandi atti- 
vati. che passa da 9 a 13. 

Al termine delle operazioni avrete 
un unico listato Basic che, una volta 
attivato, metterà a disposizione i 13 
comandi grafici. 


14870 REM ••••••••••••••*•••••• 

14880 REM * • 

14890 REM • COMANDI LOAD/SAUE • 
14900 REM * PAGINA GRAFICA • 
14910 REM • • 

14920 REM * INDIRIZZI: • 

14930 REM • GRSAUE-5141B • 

14940 REM • GRMERGE-51468 • 

14950 REM • GRLOAD-51472 * 

14960 REM * GRUERIFY-51489 * 

14970 REM • • 

14980 REM ••••••••••••*•*•*•••• 

14990 : 

15000 B-0 : FOR I “51380 IO 51561 : RE 
AD A : B-B+A : POKE I,A:NEXT 
15010 IF B<> 24860 THEN PRINT "ERRO 
RE NEI DATA DELLE ROUTINES' 

: END 

15020 B“0 : FOR 1-51164 TO 51 183: RE 
AD A: B-B+A: POKE I , A : NEXT 

15030 IF B< > 1440 THEN PRINT”ERR0R 
E NEI DATA DELLE PAROLE ” : EN 
D 

15040 B-0 : FOR 1-50190 TO 50137: RE 
AD A : B— B+A : POXE I, A: NEXT 
15050 IF B<> 1082 THEN PRINT”ERROR 
E NEI DATA DEGLI INDIRIZZI” 
: END 
15060 : 

15070 REM *••• ROUTINES 

15080 DATA 169,0,133,249,133,251 
.162,32,168.32 

15090 DATA 94,197,32,88,201,177, 
249,36,251,145 

15100 DATA 251,200,208,247,230,2 
50,230,252,202,208 
15110 DATA 240,32,109,197,32,96, 
201,96,104,104 

15120 DATA 169,224,133,250,169,1 
60,133,252,169.36 


15130 DATA 141,197,200,32,180,20 
0,32,212,225,32 

15140 DATA 88,201,162,64,160,191 
, 169,160,133,254 

15150 DATA 169,0,133,253,169,253 
, 32,216,255,32 

15160 DATA 96,201,144,3,76,249,2 
24,96,169,17 

15170 DATA 208,2,169,36,141,197, 

200.169.224.133 

15180 DATA 252,169,160,133,250,1 
69,0,240,2,169 

15190 DATA 1,133,10,104,104,32,2 
12,225,32,88 

15200 DATA 201,165,10,162,0,160, 
160,32,213,255 

15210 DATA 32,96.201,176,205,165 
,10,240,10,162 

15220 DATA 28,32,183,255,41,16,2 
08,13,96,32 

15230 DATA 180 , 200 , 32, 1B3 , 255 , 41 
,191,240,245,162 

15240 DATA 29,76,55,164,120,169, 

254.37.1.133 

15250 DATA 1,96,72,169,1,5.1,133 
, 1,88,104,96 
15260 : 

15270 REM •••* PAROLE *•* 

15280 DATA 3,71,82,148,3,71,82,1 
47,3,71 

15290 DATA 82,149.7,71,82,77,69, 
82,71,69 
15300 : 

15310 REM •••* INDIRIZZI 

15320 DATA 218,200,16,201,33,201 
, 12,201 
15330 : 

15340 REM •• ATTIUA I NU0UI COMA 
NDI •• 

15350 POKE 51051,13 





Comandi per scrivere 
nella pagina grafica 

Con tre nuovi comandi, da aggiun- 
gere ai 13 precedenti, si completa il 
set d'istruzioni grafiche proposto. 

Tramite le nuove istruzioni sarà 
possibile scrìvere caratteri alfanume- 
rici direttamente nella pagina grafi- 
ca. sia in orizzontale che in verticale. 
Tutto ciò che vorremo (numeri, lette- 
re. caratteri semigrafici) possono 
quindi integrare la leggibilità di 
qualsiasi disegno riprodotto. 

I caratteri speciali (Home. Delete. 
Cursor, e così via) verranno visti co- 
me CursorRight. faranno cioè tutti a- 
vanzare il nostro cursore ideale di u- 
no spazio a destra. 


CHAR 

sint.: CHAR X.Y.T.<testo> 
funz.: scrive la strìnga o il numero 
specificati nella pagina grafica, par- 
tendo dalla colonna X della riga Y. 

Se il messaggio non è numerico va 
messo tra virgolette come nell'istru- 
zione PRINT. 


Valori accettabili: 


Il terzo parametro (T) determina 
quale set di caratteri utilizzare: 

T=0 upper case 
T = 1 reverse upper case 
T= 2 lower case 
T=3 reverse lower case 
Se un messaggio eccede il limite in- 
feriore dello schermo, viene troncato 
automaticamente. 


VCHAR 

sint: VCHAR XY.T.<testo> 
funz.: come CHAR ma il messaggio 
viene scritto verticalmente. 


INV 

sint.: INV N 

funz.: determina il modo di disegno, 
normale se il valore di N è 0. ad inver- 
sione (in pratica viene effettuato un 
OR esclusivo dei punti) se tale valore 
è compreso tra 1 e 255. 

In modo hi-res monocromatico, se 
viene settato COLOR 1. tutte le istru- 
zioni di tracciamento eseguite dopo 
il comando INVI invertono i punti 
da disegnare: se sono spenti li accen- 
dono. se sono accesi li spengono. 

Con COLOR 0. invece, i punti ven- 
gono sempre spenti. 


In modo multicolore vengono spenti 
solo i punti che presentano lo stesso 
colore dell'ultimo comando CO- 
LOR. mentre gli altri cambiano colo- 
re. La regola si ricava effettuando 
TOR esclusivo tra le coppie di bit 
dei colori. 

Problemi di visualizzazione posso- 
no presentarsi per linee orizzontali 
in multicolore a causa della larghez- 
za doppia dei punti. 

Per aggiungere i tre nuovi comandi 
procedete in questo modo: 

1: Caricate le routine grafiche, che 
DEVONO ASSOLUTAMENTE com- 
prendere anche i comandi per il cari- 
camento e registrazione della pagina 
grafica (cfr. paragrafo precedente). 

2: Digitate la routine di questo para- 
grafo ("Char/Inv"). registrate, verifi- 
cate e date il RUN. 

L'istruzione PO RE 51051.16 di riga 
20350 servirà ad indicare all'interpre- 
te che da quel momento sono 16 i 
nuovi comandi disponibili. 

Anche in questo caso il listato viene 
"appeso" corpo principale 'del pro- 
gramma. 

Potete cancellare la riga 15350 che. 
comunque, viene neutralizzata dalla 
nuova riga Basic 20350. 


19780 REM 
19790 REM 
19800 REH 
19810 REH 
19820 REM 
19830 REn 
19B40 REFI 
19850 REH 
19860 REH 
19870 REn 
19BB0 REM 
19890 REn 
19900 REn 
19910 REn 
19920 REn 
19930 REn 
19940 REH 
19950 REn 
19960 REH 
19970 REn 
19980 REn 
19990 : 


* COnftNDI PER 

* SCRIUERE NELLA 

* PAGINA GRAFICA 

* ED EFFETTUARE 

* LA FUNZ. XDR 

* DEI PUNTI 

* DA TRACCIARE 


* INDIRIZZI 

* CHAR-5156B 

• UCHAR-51574 

• INU-51795 


* INDISPEN5ABILE 

* CARICARE PRinA 

* I CQnANDI DI 

* SAUE/LQAD 

* PAGINA GRAFICA 


20000 B-0 : FOR I-5156B TO 51826: RE 
AD A : B-B+A : POKE I , A : NEXT 
20010 IF B<> 34524 THEN PRINT”ERRO 
RE NEI DATA DELLE ROUTINE": 
END 

20020 B-0:FQR 1-51184 TO 51198: RE 
AD A : B-B+A : POKE I , A : NEXT 
20030 IF BO907 THEN PRINT"ERRORE 
NEI DATA DELLE PAROLE": END 

20040 B-0 : FOR 1-50198 TO 50203: RE 
AD A : B-B+A : POKE I. A: NEXT 
20050 IF BOS17 THEN PRINT "ERRORE 
NEI DATA DEGLI INDIRIZZI": 
END 

20060 : 

20070 REH •*** ROUTINE **•* 
20080 DATA 169,8,162,0,240,4,163 
, 64,162, 1 , 133, 181 , 134 , 182 
20090 DATA 32,158,183,224,40,144 
.3,76.72. 17B , 13B , 162 , 0 , 32 
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50100 DATO 69 , 505 ,35,541, 103, 554 
,55,176,540, 134,549, 169,54, 
56 

50110 DATA 559,549, 10, 166,54, 1B5 
.535,193, 101,547,41,546,133 
,547 

50150 DATA 185,536, 193, 101 ,54B, 1 
33,546,35,541, 163,554,4,176 
,507 

50130 DATA 134,551,6,551,6,551,3 
5,553,174.35,156, 173,36,13 
50140 DATA 46, 6, 35. 551, 1B9, 35. 13 
5,180,35, 166 , 1B5 , 170 , 540 , 10 
3 

50150 DATA 133,555,160,0,135,553 
,35,35, 505 . 144 .37,165,5,35 
50160 DATA 69,505,169,506,54,101 
, 551 , 101 , 550 , 133 , 550 ,150,16 
9,551 

50170 DATA 37,1,133,1,160,7,177, 
549,145,547,136,16,549,169 
50160 DATA 4,5,1, 133, 1,BB, 196,55 
5 , 540 ,51,54, 165 , 181 , 101 
50190 DATA 547, 133,547, 165, 1B5, 1 
01 , 546 , 133 , 546 ,176,10, 501 , 5 
55 , 506 

50500 DATA 191,165,547,501,64,14 
4,185,96,164, 553 ,177,34, 500 
. 135 

50510 DATA 553,170,46,16,501,35, 
144,11,501,96,144,4,41,553 
50550 DATA 506,5,41,63,56,96,41, 
157 , 501 , 157 , 506 ,5,169,94 
50530 DATA 501,35,96,160,0,146,5 
48,10,10,54, 54B ,10,54, 548 
50540 DATA 149,547,96,35,158,183 
, 136,540,15,169,81 , 141,515, 
193 

50550 DATA 141,45,194,141,55,194 
,96,169,17,141,515 
50560 DATA 193,141,55,194,169,14 
5,141,45,194,96 
50570 : 

50560 REM PAROLE 

50590 DATA 4,67,75,65,85,5,66,67 
,75,65,65,3,73,76,86 
50300 : 

50310 REn INDIRIZZI *• 

50350 DATA 115,501,116,501,63,50 
5 

50330 : 


50340 REH *• NUMERO DI COMANDI A 
TTIUATI •* 

50350 POKE 51051,16 


100 REM ••• ARTE ASTRATTA **• 
110 : 

150 -COL OR 1:-CLEAR:-GRAF8,0 

130 -INU1 

500 X— 160: Y— 100 

510 DEF FNR(K)-RND(0)»30-K+10 

550 FOR 1-0 TO 30 

530 X1-X+FNRC5) : X5-X1+FNRC5) 

540 FOR Y1-Y+FNRC3) TO Y1+FNRC3 
) 

550 «-DRAUIX1 , Y1 ,0, X5, Y1 , 0 
560 NEXTY1 , I 

570 FOR 1-0 TO 5000 : NEXT 
560 RUN 



100 REM ••• DEMO INU ••• 

110 : 

150 -COL OR 1 : «-CLEAR : «-GRAF3 , 1 1 
130 -CHAR11, 10,0, -QUESTO E’ L ' E 
FFETTO” 

140 -CHAR1E, 14, 1, ” DEL COMANDO 
INU " 

150 -INU1 

160 FOR K-0 TO 5 

170 FOR I --90 TO 90 

180 -DRAUII , 1 ,0, I ,-I ,0 

190 NEXTI , K 

500 - 1 NU0 : STOP 
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100 REM *•*••**•*••••••*••••** 

110 REI1 ••• ** 

120 REM DEMO CHAR-UCHAR ** 


1030 NEXT 
1100 : 

1110 FOR 1-0 TO 3 
1120 -CHAR12+I*2, 1+1-2, I ,AS+"CHA 
R " 


130 REH ••• •< 

140 REM 

1000 : 

1010 : 

1020 «-GRAF5 ,11: -CLEAR : «-COL OR 1 
1030 : 

1040 “ 

1050 : 

1060 FOR Y— 100 TO 100 STEP 20 
1070 -DRAW159, -100, 0,-160, Y,0 
1000 «-DRAUI-160, -100,0, 160, Y.0 


1130 -UCHAR15+I-2, 1+1*2, I , AS+”UC 
HAR ” 

1140 NEXT 



Lente d'ingrandimento 

Con questa istruzione, frutto della 
creatività di Fabio Sorgalo, si com- 
pleta il set di comandi grafici. Tale 
routine simula il posizionamento di 
una lente d'ingrandimento sulla pa- 
gina grafica in alta risoluzione, con- 
sentendo di vedere ingrandito tutto 
ciò che vi appare. 

Rispetto alla versione apparsa su 
Commodore Computer Club N.28. 
sono state apportate alcune variazio- 
ni allo scopo di ovviare ad un mal- 
funzionamento che si verificava in 
caso di valore illegale della coordina- 
ta Y e del colore (un banale errore di 
salto di due istruzioni BNE). e per ot- 
tenere la compatibilità completa con 
tutte le altre nuove istruzioni. 

Inoltre la routine é stata suddivisa 
in due parti per sfruttare al meglio lo 
spazio disponibile, cosi da potere di- 
sporre di più blocchi liberi per gli 

Ecco quindi come viene modifica- 
ta. in linea di massima, la mappa di 
memoria con l'inserimento dell'i- 
struzione LENS: 


...INDIRIZZI 

C41D 

...PAROLE 


C80I 

C806 

... LENS (Ima parte) 
C8BO 


CA73 

....LENS (2da Parte) 

CAFF 

CBOO 

....Blocco utilizza- 
....to da Lens 
CB3E 

CB40 

....Blocco utilizza- 
.. .to da Lens 
CB7E 


Come potete vedere non rimane 
molto spazio a disposizione (da 
SCB80 a SCBFF: due soli blocchi da 
64 byte) per i vostri sprite. Perciò sta a 
voi decidere se e quando conviene 
aggiungere il comando. 


L'istruzione Lens 

Sintassi: LENS X.Y.C 
funzione: ingrandisce la porzione di 
pagina grafica sonostante alla lente. 


Il parametro X indica la coordinata 
orizzontale del centro della lente (as- 
se ottico). I valori assegnabili sono 
compresi tra 0 e 5 1 1 . Il valore per por- 
re l'asse ottico al centro dello scher- 
mo e ' 148. 

Il parametro Y specifica la coordi- 
nata verticale dell'asse ottico della 
lente. I valori possono variare tra 0 e 
255. Con 89 si pone la lente al centro 
dello schermo. 

Attenzione perché in questo co- 
mando l'origine delle coordinate X c 
Y viene stabilita in alto a sinistrale 
non al centro dello schermo), inoltre 
la Y assume valori crescenti al di sot- 
to dell'origine. Per avere quindi una 
corrispondenza tra i punti disegnati 
e la lente occorre ricorrere alle sguen- 
ti formule: 

LX= 148+ PX 

LY=89-PY 

in cui LX ed LY sono le coordinate 
della lente e PX e PY quelle del punto 
disegnato (la coordinata Z non viene 
presa in considerazione in quanto la 
lente non lavora in 3D). 

Il parametro C indica il colore dei 
punti ingranditi e può variare tra 0 e 
255: si consiglia di usare lo stesso co- 
lore scelto per il disegno. La tabella 
dei colori t quella solita degli sprite. 
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La lente è stata creata per funziona- 
re con grafica monocromatica in alta 
risoluzione, quindi si consiglia di 
non usarla in modo multicolor o in 

Anche questo comando sfrutta 
l'opzione “$" per i parametri prece- 
dentemente definiti: fate quindi at- 
tenzione ad usarla con criterio se in- 
tendete awalervene (rileggete il para- 
grafo a questa dedicato). 

Per disattivare la lente basta ese- 
guire: 

POKE 53269,0 

oppure la si può fare scomparire as- 
segnando alla X valori che la portino 
oltre lo schermo visibile (es. LENS 
400,0,0). 

Come funziona Lens 

La lente è uno sprite. in cui vengo- 
no trasferiti i dati, con le coordinate 
X e Y raddoppiate, posto nella zona 
di schermo da cui sono prelevati i da- 
ll primo problema che si presenta è 
quello di individuare la zona di me- 
moria da cui devono essere prelevati 
i dati e si risolve tramite la segunte 



formula: 

L = START +40*(Y AND 504)+Y 
AND 7+X AND 504 

dove L è la locazione di memoria da 
cui è prelevato il byte, mentre START 
è la locazione d’inizio della pagina 
grafica. 

11 secondo problema si presenta nel 
trasferire i dati nello sprite. data la di- 
versa configurazione di questo ri- 
spetto alla pagina grafica. Per risol- 
verlo si deve ricorrere a “rotazioni” 
binarie che ogni buon programmato- 
re esperto in linguaggio macchina 
dovrebbe sapere usare. 


L'ultimo problema è dato dalla tra- 
sparenza dello sprite per cui ponen- 
dolo (espanso in entrambe le dimen- 
sioni) nel punto desiderato, osserve- 
remo una sovrapposizione di punti 
con il disegno sottostante. 

La soluzione consiste nel porre nel- 
lo stesso punto un secondo sprite 
"pieno", cioè completamente colora- 
to con il colore del fondo dello scher- 
mo grafico e con precedenza di vi- 
sualizzazione inferiore rispetto a 
quello contenente i dati della lente 
(in questa routine vengono utilizzati 

10 sprite 0 per i dati e lo sprite 1 
per lo sfondo). 

Anche in questo caso le istruzioni 
da seguire per l'attivazione del nuovo 
comando sono: 

1: Caricare il programma Basic delle 
routine grafiche finora realizzato. 

2: Digitare il programma "Lente d'in- 
grandimento". registrare e verificare 

11 tutto. 

3: Dare il RUN. 

Potete ora cancellare la riga 20350 
che. comunque, viene neutralizzata 
dalla 25440. 


24B00 REM •*•******••**••**•* 

24810 RE(1 * * 
24820 REM • LENTE • 
24830 RE(1 • □ ’ INGRANDIMENTO * 
24840 REfl • BY F.SORGATO • 
24850 REM • MODIFICATA PER • 
24880 REM * OTTENERE * 
24870 REM * COMPATIBILITA’ * 
24880 REM * CON GLI ALTRI * 
24880 REM * NUOUI COMANDI * 
24300 REM *•***•**••*•**•••** 
24810 REM • INDIRIZZO: • 
24820 REM * LENS-51206 * 
24830 REM ****•***•*••••••*•* 

24840 REM • E’ NECESSARIO * 
24850 REM * SIANO GIÀ’ STATI» 
24880 REM • CARICATI TUTTI • 
24370 REM «GLI ALTRI COMANDI* 
24SB0 REM *•***•*•••*•******• 
24880 : 

25000 B-0:FOR I “51206 TO 51378: RE 


AD A : B-B+A : POKE I,A:NEXT 
25010 IF B<> 20775 THEN PRINT”ERRO 
RE NEI DATA DEL BLOCCO 1”:E 
ND 


25020 B~0 : FOR 1-51827 TO 51867: RE 
AD A : B-B+A : POKE I , A : NEXT 
25030 IF B< >18732 THEN PRINT”ERRO 
RE NEI DATA DEL BLOCCO 2”: E 
ND 

25040 B“0 : FOR 1-51188 TO 51201 : RE 
AD A : B-B+A : POKE I, A: NEXT 
25050 FOR 1-50204 TO 50205: READ A 
: B— B+A : POKE I, A: NEXT 
25080 IF B<>486 THEN PRINT”ERRORE 
NEI DATA PAROLA/ INDI RIZZO” 
: END 
25070 : 

25080 REM •*•• ROUTINE •**• 
25080 REM •••• BLOCCO 1 •*• 

25100 DATA 32,143,187,173,208,2, 
133,07,173,203,2,41,254,240 
25110 DATA 5, 182, 14, 10B, 0,3, 173, 
208,2,133,88,173,210,2 
25120 DATA 133 , B3 , 173, 21 1 , 2 , 208 , 
238,173,212,2,133,31 ,173,21 
3 

25130 DATA 2,208,226,173,0,207,4 
1,15,133,80, 168 , 44 , 141 , 248 
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INDIRIZZO •• 


25140 DATA 207,169,45,141,249,20 
7,169,3,141,21,208,141,23,2 
08 

25150 DATA 141,29,208,165,90,141 
.40,208,165,91 , 141,39,208,1 
20 

25160 DATA 169,53,133,1,169,0,13 
3,94,133,2,32,115, 202 . 160 
25170 DATA 0,165,87,24,105,12,14 

4.2.160.3.141.0. 208.141 
25180 DATA 2 , 20B , 165 , 89, 24 , 105 , 1 

B , 141 , 1 , 208 ,141,3, 208 , 165 
25190 DATA BB , 240 , 2 , 160 , 3 , 132, 25 
1,173,16, 20B , 41 . 252 .5,251 
25200 DATA 141,16,208,162,64,160 
, 255 ,189,191,3,157, 255 , 202 , 
152 

25210 DATA 157,63,203,202,208,24 
3,169,55,133,1,169,96,141,6 
5 

25220 DATA 3,88,96 
25230 : 

25240 REM BLOCCO 2 

25250 DATA 165,89,74,74,74,10,13 
3 , 251 , 169 ,160,133, 252 ,32,23 
0 

25260 DATA 202,165,87,41,7,170,1 
65,87,41, 248 ,133,90,165,89 
25270 DATA 41,7,5,90,24,101,254, 
144,2, 230 , 255 , 133 , 254 , 165 
25280 DATA 255,24,101,88,105,224 
, 133,255,160,0,177,254,153, 
90 

25290 DATA 0,165,254,24,105,7,14 
4,2, 230 , 255 . 133 , 254 , 200 . 192 
25300 DATA 4 , 20B , 235 , 138, 240, 11 , 
6,93,38,92,38,91,38,90 
25310 DATA 202 , 20B , 245 , 164 , 94 , 16 

2.0. 181.90. 153. 192 . 3 . 230 . 94 
25320 DATA 200,232,224,3,208,243 

, 230 , B9 , 230 ,2,165,2,201,21 
25330 DATA 208,142,96,169,0,162, 
8,10,38,251,144,7,24,101 
25340 DATA 252,144,2,230,251,202 
, 20B ,241,133, 254 , 165 , 251 , 13 
3,255 

25350 DATA 96 
25360 : 

25370 REfl •••• PAROLA •••* 
25380 DATA 2,195,83 
25390 : 


25400 REM •••• 

25410 DATA 6,200 
25420 : 

25430 REtl •• NUMERO DI COMANDI 
ATTIUATI •* 

25440 POKE 51051,17 


100 REM •••• DEMO LENS ••• 
110 : 

120 -CLEAR: -GRAF3.il: -COL OR 1 
130 FOR K-0 TO 200 STEP 10 
140 -DRAW-160, 100-K, 0, K*1 .6-160 
,- 100,0 

150 -DRAWK*1 .6-161 ,99, 0, 159,99- 
K , 0 

160 NEXT 

170 FOR K-0 TO 50 STEP 10:-CIRC 
LE0 , 0 , 0 , K , 50 : NEXT 
180 FOR K-0 TO 50 STEP 10:-CIRC 
LE0 , 0 , 0 , 50 , K : NEXT 
190 -CHAR2 ,2,1,” PER MUOUERE LA 
LENTE USA - 

200 -CHAR4 , 4 , 1 , “ I TASTI DEL CU 
RSORE ” 

210 : 

220 X-14B: Y-B9:S-4 
230 GET AS 

240 IF AS-”CRIGHTD” THEN X-X+S: 

REM CURSOR RIGHT 
250 IF AI--CLEFTD" THEN X-X-S:R 
EM CURSOR LEFT 

260 IF AS-"CDOUIN3 ” THEN Y-Y+S:R 
EM CURSOR DOWN 

270 IF AS--CUP3” THEN Y-Y-S: REM 
CURSOR UP 
280 -LENSX , Y , 0 
290 GOTO 230 






Come assemblare i 
moduli 

Se non avete ancora provveduto a 
riunire tutti i moduli (listati Basic) in 
un unico programma, queste poche 
righe di comandi Basic vi faranno ri- 
sparmiar tempo e fastidi: alla fine 
riunirete in un unico file "compatto" 
(solo 12 blocchi su disco!) i diciasset- 
te i comandi presentati. 

Le operazioni da compiere sono 


1: Caricare i vari moduli uno alla vol- 
ta (nell'ordine prescritto dai listati) e 
dare il RUN dopo ciascun carica- 
mento: oppure caricate il program- 
ma ottenuto dalla "somma" dei vari 
programmi delle pagine precedenti 
(tranne, ovviamente, i "Demo") e da- 
te il RUN. 

POKE44.40: 

POKE I0240,0:NEW 

3: Caricare il listato "Compattatore" 
e dare il RUN. 


10 REM ••••*••••••*••** 

20 REN * "ASSEMBLATORE "• 

25 REM * DEI NODULI • 

30 REM * DELLE ROUTINE* 

35 REN * GRAFICHE * 

40 REN **•*•••••*•**••• 

50 REN * PRINA DI CA- • 

62 REN • RI CARE QUESTO* 

63 REN • PROGRANNA • 

65 REN • ESEGUIRE: • 

66 REN ••••**••*******• 

67 REN * POKE 44,40 • 

70 REN * POKE 10240,0 * 

72 REN * NEUJ * 

75 REN *••*••••••••***• 

30 : 

100 PRINTCHR5C 1473 ;SPCC252) "ATT 
ENDERE PREGO” 

110 : 

120 FOR I-204B TO 2100: READ A : B 
-B+A : POKE I , A : NEXT 

Spostamento del punto 
di vista 

Una volta presentate le possibilità 
esplicite di queste collaudate routine 
grafiche, è giunto il momento di sve- 
lare un piccolo segreto che consenti- 
rà di ottenere nuove prestazioni. 

Quando Toma scrisse le routine, 
pose il punto di vista al centro dello 
schermo perchè in questo modo le 
immagini tridimensionali risultano 
più "naturali" all'osservatore che ab- 
bia in mente, come paragone, la pro- 
spettiva fotografica. 

E' però possibile, tramite due sem- 
plici POKE. disporre di altri "punti 
di vista" cosi da potere osservare gli 


4: Quando compare la scritta "OK 
PUOI SALVARE" registrate su disco 
o nastro il file compatto cosi creato 
col nome che preferite. 

Avvertenza: se provate a listare ve- 
drete solo la linea: 

0 SYS 2061 

dal momento che il resto del pro- 
gramma è "invisibile" per l'Interprete 

Per utilizzare tale file basterà, in se- 
guito. caricarlo come un normale 
programma c dare il RUN. In una 
frazione di secondo le nuove istru- 
zioni saranno abilitate! 

130 IF B< >6877 THEN PRINT ”ERR0R 
E NEI DATA”: END 
140 : 

150 FOR 1-0 TO 11*256: POKE 2112 
+ 1 , PEEKC49152+I 3 : NEXT 
160 : 

170 POKE 43,1: POKE 44, B: POKE 45 
,64: POKE 46,19 

1B0 PRINTCHRSC 147) ; SPCC2523 ”0K 
PUOI SALDARE” 

130 : 

200 DATA 0,11,8,0,0,158,50,48, 
54,43,0,0,0 

210 DATA 169,64, 133.247, 163, B, 

133.248.163.0 

220 DATA 133,243,163,132,133,2 

50.162.11. 160.0 

230 DATA 177,247,145,243,200,2 
08,243,230,248,230 
240 DATA 250,202,208,240,32,56 
, 139,76,60,194 


oggetti creati da diverse angolazioni. stare il punto di vista. 

Ma vediamo che cosa significa spo- Immaginate di essere davanti ad u- 
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na finestra e di osservare un oggetto 
posto al di là di questa. Poniamo che 
sia esattamente di fronte a voi. ed 
immobile. 

Provate ora a spostarvi lateralmen- 
te continuando a fissare l'oggetto. Fa- 
cendo ciò vi accorgete di due fatti: 

• La porzione della figura a voi visi- 
bile cambia: se prima vedevate solo 
la parte frontale, a mano a mano che 
vi spostate, riuscite a vedere parti la- 
terali che vi erano prima invisibili. 

• L'oggetto sembra spostarsi nella vo- 
stra stessa direzione se mantenete co- 
me "cornice" di riferimento la fine- 

La traslazione apparente è tanto 
maggiore quanto più l'oggetto è lon- 
tano dalla finestra e se vi spostate 
troppo esce addirittura dal campo 
visibile. 

Naturalmente lo stesso discorso va- 
le anche per traslazioni verticali del 
nostro occhio. 

Con il computer possiamo ottenere 
gli stessi risultati. 

Nel nostro caso lo schermo del mo- 
nitor sostituisce la finestra e il punto 
di vista delle routine rappresenta il 
nostro occhio. 

Come esempio potete osservare le 
figure A e B (ottenute direttamente 
dallo schermo con la routine di hard 
copy per la MPS 802). 

La crocetta serve solo per indivi- 
duare la posizione del punto di vista 
dal quale vengono osservati i cubi. 

Chiariamo subito che la distanza 
dallo schermo del punto di vista. cioè 
la sua coordinata Z. è fissa mentre 


ciò che possiamo modificare sono i 
parametri X e Y. 

Per traslare il punto lungo l asse 
delle ordinate, cioè verticalmente, 
basta eseguire: 

POKE 50151A 

dove A può assumere valori compre- 
si tra 0 e 255. 

Il valore di default delle routine è 
100. Assegnando ad A il valore nullo, 
il punto di vista si troverà nella posi- 
zione più bassa possibile dello 
schermo. 

Aumentando il valore avremo una 
corrispondente elevazione del punto 
di vista che. per valori superiori a 199, 
uscirà dallo schermo visibile. 

Ciò. badate bene, non significa af- 
fatto che non vedrete più nulla, ma 
semplicemente che lo vedrete ancora 
più dall'alto. 

L'operazione per traslare il punto 
d'osservazione lungo l'asse delle a- 


scisse (orizzontalmente) è analoga 
alla precedente: 

POKE 50I47A 

Anche qui A può assumere valori 
compresi tra 0 e 255. 

Il valore "normale" delle routine 
è 160. 

Come avrete intuito, ciò comporta 
il fatto che il nostro punto di vista 
non potrà essere spostato fino al li- 
mite destro dello schermo visibile 
(vedi disegno I ). 

Altra limitazione è data dal fatto 
che "Pokando" il valore zero nella lo- 
cazione 50147 si entra in un caso spe- 
ciale. Con tale valore, infatti, l'ascissa 
del nostro punto d'osservazione as- 
sume automaticamente il valore del- 
l'ordinata. Ad esempio: se nella loca- 
zione 50151 abbiamo depositato il 
valore 80 e nella locazione 50147 il 
valore 0. le coordinate del nostro 
punto di vista saranno (80.80). 

L'unico caso in cui potremo avere il 
punto con ascissa 0 si avrà quando 
anche l'ordinata sarà 0: punto (0.0). 

Attenzione 

I valori delle locazioni 50151 e 
50147 rimangono "fissi”e non vengo- 
no riinizializzati con un semplice 
RUN. Tutti i disegni realizzati dopo 
l'alterazione delle due locazioni sa- 
ranno tracciati avendo il loro conte- 
nuto come riferimento. 

Per tornare a valori “normali" inse- 
rite i due comandi: 

POKE 50151. 100 
POKE 50147.160 
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mente 160 e 100 a OX e OY fisseremo 
l'orìgine degli assi al centro dello 
schermo, indipendentemente dalla 
posizione del punto di vista. 

Naturalmente le espressioni OX- 
PEEK(50147) e OY-PEEK<50151), 
che non cambiano di valore finché 
non muta il contenuto delle locazio- 
ni "pee leale", potete assegnarle a due 
variabili per evitare di ripeterle ad o- 
gni istruzione grafica. Ad esempio: 

DX=OX-PEEK(50147) 

DY=OY-PEEK(50151) 

DRAW X1 + DX.Y1 + DY.Z1.X2+ 
DX.Y2+DY.Z2 

Demo 

er aiutarvi a comprendere meglio 
quanto esposto proponiamo un sem- 
plice programma demo. 

Caricatelo e date il RUN (ovvia- 
mente dovrete avere prima caricato 
le routine grafiche). 

Tramile i tasti del cursore potrete 
scegliere il punto da cui osservare 
due cubi che rimangono fissi nello 
spazio, anche se a voi sembrerà che si 
spostino in una certa misura (rilegge- 
tevi il paragrafo in cui é riportato l'e- 
sempio della finestra). 

Una piccola croce individua il pun- 
to di vista. Se eleverete di molto il 
punto di osservazione la croce spari- 
rà. cioè uscirà dallo schermo. 

Come potete vedere (linea 230) DX 
e DY vengono sommati alle coordi- 
nate di uno solo dei vertici dei cubi 
(quello che appare più vicino, in bas- 
so a sinistra) poiché tutti gli altri sono 


automaticamente calcolati in funzio- 
ne del primo. 

Le dimensioni dei cubi sono date 
dalla variabile L = lato (linea 140). 

Per evidenziare il punto di vista 
vengono tracciate due linee perpen- 
dicolari tra loro (linee 260 e 270) che 
si incrociano in corrispondenza del- 
l'origine. Come potete osservare in 
questo caso non vengono aggiunte le 
rettifiche DX e DY perchè interessa 
ora seguire gli spostamenti del punto 

Due esempi di ciò che apparirà sul- 
lo schermo li avete già visti nelle figu- 


Origine degli assi 

Per motivi di semplificazione nel 
progetto delle routine, il punto di ori- 
gine degli assi viene automaticamen- 
te posto, sullo schermo, in corrispon- 
denza del punto di vista. 

Ciò significa che spostando quest'ul- 
timo si ha un'identica traslazione del 
primo. Se ad esempio nelle locazioni 


50147 e 50151 deponete il valore zero, 
non avrete solo il punto di vista che si 
sposta nell'angolo in basso a sinistra 
dello schermo, ma anche l'origine 
degli assi. Cosi il punto di coordinate 
(0.0), che “normalmente" si trova al 
centro dello schermo, si sposta nel ci- 
tato angolo. Per una più chiara com- 
prensione osservate le figure A e B. 

Questo movimento simultaneo, pe- 
rò. impedisce il cambiamento del- 
l'angolo di osservazione degli oggetti 
disegnati. 

Quando, infatti, per avere una di- 
versa visuale delle figure, spostiamo 
il punto di vista, queste si spostano 
solidalmente ad esso poiché la loro 
posizione nello spazio (o meglio nel- 
lo schermo) prende come punto di ri- 
ferimento l'origine degli assi che. co- 
me già detto, corrisponde sullo scher- 
mo alla posizione del punto di 

Per capirci meglio fate conto di tro- 
varvi di fronte ad uno specchio: per 
quanto vi spostiate lateralmente, la 
vostra immagine vi seguirà solidal- 
mente e non riuscirete mai a vedervi 
di... profilo. 

Il rimedio per mantenere fìssi gli 
oggetti rispetto allo schermo, e quin- 
di visibili sotto diverse angolazioni, 
è semplice. 

Basta correggere i valori delle coor- 
dinate X e Y nel modo indicato: 

X=X+OX-PEEK( 50147) 

Y=Y+OY-PEEK( 50151) 

Le variabili OX e OY possono assu- 
mere valori tra 0 e 255 ed indicano la 
posizione FISSA dello schermo che 
vogliamo sia presa come punto di ri- 
ferimento (cioè come origine) dalle 
coordinate. 

Ad esempio assegnando rispettiva- 




REM 


105 REM *** ESEMPIO DI SPOSTA 
MENTO *** 

110 REM *** DEL PUNTO DI UISTA 
DELLE *** 

115 REM ROUTINES GRAFICH 

E II *** 

150 REM •**•••••**•****•*•**•* 

130 : 

140 H-150 : K— 153 : L-l 10 : «-GRAFI 1 , 1 
: «-COL OR 1 
150 «-CLEAR 
160 : 

170 REM *** ABILITAZIONE NUOUO 
PUNTO DI UISTA **• 

1B0 POKE 50147 ,K:POKE 50151, H 
130 : 

500 REM •** RETTIFICA DELLE CO 
ORDINATE PER MANTENERE ••• 
510 REM L’ORIGINE DEGLI AS 

SI AL CENTRO DELLO SCHERMO 

550 DX“160-PEEKC50147):DY“100-P 
EEKC50151 ) 

530 X-DX+49: Y-DY-100: REM *• C 
OORD. DI UN UERTICE DEI CUB 

I •* 

540 : 

550 REM *** EUIDENZI A IL PUNT 


0 DI UISTA *** 

560 -DRAU-10,0,0,10,0,0 
570 «-DRAW0 ,-10,0,0,10,0 
5B0 : 

590 REM *** DISEGNA I CUBI 

300 FOR 2-50 TO 300 STEP 550: FO 
R 1-0 TO 1 

310 «-DRAUJX , Y+I*L, Z, X+L , Y+I*L , Z 
350 *-DRAW$ , S , Z+L , S , S , Z+L 
330 «-DRAWX+L , $ , Z , S , $ , S 
340 «-DRAUIX , $ , Z , X , $ , $ 

350 NEXT 

360 FOR 1-0 TO 1 

370 «-DRAU1X, Y,Z+I»L,X,Y+L,Z+I»L 

3B0 «-DRAUJX+L , S , I , X+L , S , S 

390 NEXT: NEXT 

400 : 

410 REM SCELTA DEL NUOUO 

PUNTO DI UISTA ••• 

450 GET AS : I F AS-”" THEN 450 
430 IF AS-CHRSC 145) AND H<505 T 
HEN H-H+50 

440 IF AS-CHRSC17) AND H>49 THE 
N H-H-50 

450 IF AS-CHRSC59) AND K<505 TH 
EN K-K+50 

460 IF AS-CHRSC 157 3 AND K>49 TH 
EN K-K-50 
470 GOTO 150 


Hard Copy della 
pagina grafica su 
MPS-802 

T ulti i possessori della vecchia, ma 
ottima, stampante MPS 802 hanno 
prima o poi desiderato, magari utiliz- 
zando il Simons' Basic o altri pro- 
grammi dotati dell'opzione "hard 
copy", di riportare il contenuto della 
pagina grafica su carta. 

Purtoppo il risultato di una simile 
richiesta è quasi sempre un inchio- 
damento della stampante con la spia 
rossa che lampeggia minacciosa- 

La gestione grafica di questa stam- 
pante è infatti differente da quella u- 
tilizzata dalle altre stampanti Com- 
modore. 

Questa incompatibilità può essere 


davvero seccante soprattutto perchè 
“tarpa le ali" ad una macchina dalle 
prestazioni superiori (rispetto alle 
MPS 801-803) in fatto di qualità di 
stampa. 

Disperarsi comunque non serve: è 
molto meglio copiare questa breve 
routine c inserirla nei propri pro- 
grammi al posto di quelle "802- 
incompatibili". 

La gestione della 
grafica mps /802 

Come saprete, se conoscete l'ingle- 
se e se avete Ietto il manuale, è possi- 
bile definire e comunicare alla stam- 
pante un carattere, che non sia tra 
quelli del normale set di caratteri, e 
farlo stampare. 

Ogni carattere è il risultato di una 
matrice di 8x8 punti e le informazio- 


ni circa i punti della matrice da scri- 
vere. o da lasciare in bianco.' vengono 
prese da otto byte (che come è noto 
sono formati ognuno da otto bit) da 
comunicare tramite un Print CHRS 
alla stampante, utilizzando un appo- 
sito canale (indirizzo secondario 5). 

Il manuale spiega chiaramente co- 
me calcolare i dati da comunicare, 
perciò non ci dilunghiamo. 

A questo punto avrete già intuito la 
tecnica da utilizzare per copiare la 
pagina grafica (che è un insieme or- 
dinato di byte): basta passarne alla 
stampante un “pezzetto" di 8x8 punti 
per volta e farlo stampare come se 
fosse un carattere ridefinito. 

Senonchè sullo schermo i byte so- 
no posti "orizzontalmente" mentre la 
stampante li butta fuori "vertical- 
mente". Occorre perciò una routine 
che si occupi di trasformare gli otto 
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byte da comunicare in modo che l'u- 
scita su carta sia corretta. E' un'ope- 
razione che riesce molto più facil- 
mente in Linguaggio Macchina (uti- 
lizzando le istruzioni di scorrimento 
c di rotazione) che in Basic. 

A questo punto sembrerebbe tutto 
risolto, ma non abbiamo fatto i conti 
con la diabolicità dei progettisti della 
Commodore. Nella nota in fondo a 
pagina 24 del manuale, infatti, viene 
detto che si possono avere caratteri 
programmabili diversi, sulla stessa 
linea di stampa, ma solo "by over- 
printing". 

Che cosa significa? Finché non 
mandate alla stampante un segnale 
di ritorno carrello. CHR$(I3). non 
potete cambiare il carattere grafico 
da stampare! Ma noi dobbiamo 
stamparne 40 di caratteri diversi per 
ogni riga. 

La soluzione esiste, anche se piut- 
tosto macchinosa: basta riscrivere la 
stessa linea 40 volte senza fare avan- 
zare la carta ("overprinting"). “spo- 
stando" ogni volta la posizione in cui 
stampare il carattere (diverso ogni 
volta) di una posizione verso de- 
ll programma che svolge tale com- 
pito è più semplice della spiegazione 
precedente anche se non brilla certo 
per velocità di esecuzione: per stam- 
pare finterà pagina grafica occorro- 
no più di cinque minuti (tenete conto 
che vengono stampate 1000 linee 
"virtuali"). 

Mediante l'apertura di un altro de- 
gli undici canali di comunicazione, c 
precisamente il n.6. si può stabilire, 
entro certi limiti, quanto deve avan- 
zare la carta tra una linea e la succes- 
siva. Un esempio di come utilizzare 
questa opzione si trova a pagina 2 5 
del manuale. 

Inviando alla stampante, tramite 
questo canale, un CHRS(0) otterre- 
mo di non fare avanzare la carta 
quando si ha il "ritorno carrello". 

Con CHR$(20). invece, le linee di 
stampa vengono poste una sotto l'al- 
tra senza lasciare spazi. 

Routine di Hard Copy 

Commentiamo, dunque, il breve li- 
stato proposto. 

Come molti sapranno i possibile 


sistemare la pagina grafica in varie 
posizioni nella memoria. 

La routine proposta stampa la pa- 
gina posizionala a partire dalla loca- 
zione 57344 (cioè quella utilizzata 
dalle routine grafiche qui presenta- 
te). 

Basta comunque cambiare il sesto 
DATA (224) della linea 10. che indica 
la locazione iniziale della pagina 
grafica, per fare stampare qualsiasi 
pagina desideriate. 

Il valore da inserire va calcolato nel 
modo seguente: 

DATA - 1/256 

dove I è l'indirizzo in cui inizia la 
pagina grafica. 

Ad esempio il valore da sostituire a 
224 sarà 160 per la pagina posiziona- 
ta "sotto" l'interprete Basic (40960/ 
256=160). 

Può interessare sapere che il Si- 
mons' Basic utilizza la nostra stessa 
pagina. 

La routine in Linguaggio Macchi- 
na viene allocata nel buffer del regi- 
stratore: ne consegue che (per sicu- 
rezza) è bene riallocarla (cioè fare e- 
seguire la linea 1000) ogni volta che 
utiizzate questo breve programma. 

Poiché il comando RESTORE fa i- 
niziare la lettura dal primo DATA in 
memoria, assicuratevi che le linee 
che contengono i DATA proposti sia- 
no le prime linee di DATA dei pro- 
grammi in cui includete tale rou- 

Un'ulteriorc informazione sembra 
doverosa: oltre alle locazioni dalla 
820 alla 891 vengono utilizzate dalla 
routine in linguaggio macchina, per 
le "manipolazioni" dei dati da tra- 
smettere. anche le locazioni dalla 892 
alla 907. 

Due considerazioni riguardo al for- 
mato di stampa. 

La prima è che una schermata vie- 
ne ridotta ad un disegno di 9.5*6 cm. 
(la scala è comunque 1:1). Potete otte- 
nere un disegno largo il doppio inse- 
rendo. nella linea 1060. un CHR5 
(14): 

1060 PRINT #4.CHRS( 1 4)BS: 

B$ = B$+CHR$(32) 


però occorreranno ben 23 minuti 
per il completamento della stampa. 

Seconda considerazione: la varia- 
bile BS. introdotta nella linea 1030. 
determina a quale distanza dal mar- 
gine sinistro del foglio deve essere 
stampata la pagina grafica. La di- 
stanza viene determinata dal nume- 
ro di SPAZI (CHR$(32)) che questa 
variabile contiene e ciò lo decidete 
voi rispondendo alla domanda che il 
programma pone all'inizio. 

E veniamo all'ultima linea del 
listato. 

Questa serve per re setta re la stam- 
pante, una volta terminata l'opera- 
zione di hard copy. E' necessaria per- 
chè la stampante tomi a scrivere con 
le linee spaziate tra loro "normal- 
mente". In teoria basterebbe comuni- 
care. attraverso il canale 6. il valore di 
"default" dell'interlinea (che a pagi- 
na 25 del manuale viene scritto essere 
24) ma una prova in tale senso ha da- 
to linee con spaziatura inferiore al 
normale. A "occhio” il valore corret- 
to dovrebbe essere 34 ma, a scanso 
d'errori, è preferibile un bnitale Re- 
set software che aggiusta tutto. 

IMPORTANTE: quando vengono 
premuti i tasti Run/Stop c Restore 
contemporaneamente la pagina gra- 
fica viene "sporcata" (come già ac- 
cennato nelle spiegazioni delle routi- 
ne grafiche). State quindi attenti a 
non effettuare tale operazione prima 
di avere stampato il disegno. 

Ricordiamo che al momento dell'e- 
secuzione della routine di hard copy 
non occorre che sia visualizzata sul 
monitor la pagina grafica. 

Riassumiamo infine le operazioni 
da effettuare per stampare la pagina 
grafica. 

• Disegnare qualcosa nella pagina 
grafica. 

• Caricare il programma “MPS/802 
Hard Copy". 

• Dare il RUN. 

Ovviamente potete unire la routine 
di hard copy e quella che consente di 
disegnare in un unico programma, 
senza doverla caricare ogni volta che 
volete stampare. 
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1 REM 

3 REM * MPS 808 HARD COPY • 

4 REfl • • 

5 REM * BY DANILO TOMA * 

7 REM 

B : 

10 DATA 169 , 0 , 133 , £53, 163 , 884 
, 133,854,96,160 

80 DATA 7,38.108,3,177,853,15 

3.184.3.136 

30 DATA 16,848,38,116,3,160,7 
, 168 ,7.94 

40 DATA 184,3, 106,808, 16,849, 

153.138.3.136 

50 DATA 16,841,84,165,853,105 
.8,133,853,165 

60 DATA 854,105,0,133,854,96, 
180,169,858,37 

70 DATA 1,133,1,96,169,3,5,1, 
133,1 

80 DATA 88,96 

1000 RESTORE :K-0:FOR 1-880 TO 8 
91: READ A:K-K+A:POKE I,A:NE 
XT 

Hard Copy della 
pagina grafica su 
MPS-803 

Questa routine ricorre, per il fun- 
zionamento. a raffinate tecniche di 
programmazione in LM (vedi disas- 
semblato commentato): dame una 
spiegazione dettagliata sarebbe fuo- 


1008 IF KOB066 THEN PRINT”ERROR 
E NEI DATA" : END 

1005 INPUT "DISTANZA DAL MARGINE 

SINISTRO (0-40 ) ” ; CS 

1006 C-UALCCS) : IF C<0 OR 040 TH 
EN 1005 

1007 CS - " " : I F C-0 THEN 1010 

1008 FOR 1-1 TO C: CS-CS+CHRSC38) 
: NEXT 

1009 : 

1010 OPEN 4,4: OPEN 5,4,5:0PEN 6 
4,6: SYSB80 

1080 FOR K-0 TO 84 : PRINTH6 , CHRSC 
0) 

1030 BS-CS : FOR J-0 TO 39:SYSB89 

1040 AS- " " : FOR 1-900 TO 907 : AS-A 
S+CHRSC PEEKC I )) : NEXT 

1050 PRINTRS.AS 

1060 PRINT#4,B$; : BS-BS+CHRSC38) 

1070 PRI NT* 4 , CHRSC 854 ) : NEXT 

1080 PRINTR6 , CHRSC 80) : PRINTR4 : NE 
XT 

1090 CLOSE 4 : CLOSE 5:CL0SE 6 

1100 OPEN 4 , 4 , 10 : PRINTR4 : CLOSE 4 


Ci limiteremo a ricordare alcuni 
punti fondamentali per il suo corret- 
to utilizzo. 

• La routine LM occupa le locazioni 
da 40704 a 40940 utilizzate normal- 
mente dal Basic per allocare le 
stringhe. 

• Onde evitare pericolose cancella- 
zioni i necessario SEMPRE inserire 
i comandi che alterano le locazioni 
del Top di memoria (vedi riga 0). 


• Dopo aver caricato (e lanciato) le 
routine grafiche, caricare e lanciare il 
semplice programma Basic pubbli- 
cato: automaticamente i puntatori 
verranno messi a posto. 

• Caricare e/o digitare i programmi 
che fanno ricorso alle routine grafi- 
che e impartire SYS 40704 tutte le vol- 
te che si intende inviare alla stam- 
pante la pagina grafica. 


0 POKE 56, 159: PDXE 55.0:CLR : 
REM SPOSTA PUNTATORI TOP M 
EMORY 
5 : 

10 REM HARD COPY DI PAGINA 
15 REM GRAFICA PER STAMPANTI 
80 REM MPS/B01, /B03 E COMPATÌ 
BILI 

30 REM BY FABIO SORGATO 
35 : 

40 REM COPY: SYS 40704 
50 REM PER INTERROMPERE: RUN/S 
TOP 
60 REM 

100 FOR K-40704 TO 40940: READ A 
: POKE K , A: B-B+A: NEXT 


110 

180 

60000 

60010 

60080 

60030 

60040 

60050 

60060 

60070 

60080 

60090 

60100 

60110 

60180 


IF B-3i 

E NEI 

END 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


137,159 

169,096 

000,038 

000,038 

198.855 

801.855 
169,096 
169,000 
165,088 
001,840 
159,084 
801,064 
079,808 


038,031 

168,004 

186.855 

189.855 
168,096 
038,181 
076, 195 
141,836 
840,015 

,005,838 

096. 165 
176,845 

841.165 
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DI5A55EMBLAT0 COMMENTATO 


CQMPLEMENTA A 2 


C000 EOR «SFF 
C002 SIA SFA.X 
C004 LDA SK9.X 
C006 EOR «SFF 
C008 STA SF9.X 

C00A INC SFS.X 

C00C BNE SC010 
C00E INC SFA , X 
C010 LDY «SCA 
C012 LDX «SFF 
C014 KTS 


ESEGUE IL COMPLEMENTO 
A DUE DEL NUnERO 
CONTENUTO IN A 
ED IN SFA 

RISULTATO IN SF9-FA*X 


CARICA Y CON COD . UEX 
E X CON SFF 


TRASFERISCE COORDINATE 


C01S LDX 
C017 LDA 
C01A STA 

C01C DEX 
C01D BPL 
C01F LDA 
C022 STA 
C024 LDA 
C027 STA 
C029 LDA 
C08C STA 
C02E SIA 
C030 LDA 
C033 STA 
C035 SIA 
C037 RIS 
C038 NOP 
C03S NOP 


«S03 

S02D6.X 

SSU.X 


SI E 

S02D3 

SSC 


TRASFERISCE I UALOR1 
; DEI PARAMETRI Y2 E X2 
DAL "MAGAZZINO" 
ALL'AREA DI LAGURO 


TABELLA PER PLOT/UNPLOT MULTICOLOR 


C03A C0 30 0C 03 00 SS AA FF 


C042 NOP 
C043 NOP 
C044 NOP 
C04S NOP 
C046 NOP 
C047 NOP 


ROUTINE PRINCIPALE DI DRAW 


C04B LDY «SEB 
C04A LDX «S00 
C04C SEC 
C04D LDA SSD 
C04F SBC SS7 
C0S1 STA SF9 
C0S3 LDA SSE 
C0SS SBC $58 
C0S7 STA SFA 
C0S9 BPL SC0SE 
C05B JSR SC000 
C05E STY SCI 37 
C061 STX SCI 3B 


CARICA Y CON COD. INX 
E X CON S00 
CALCOLA 0X-X2-X1 
CIOÈ' LA DIFFERENZA 
TRA LE ASCISSE DEGLI 
ESTREMI DELLA LINEA 


; SE DX E' POSIT. SALTA 
; COMPLEMENTA IL RISULT. 
1 MODIFICA LA ROUTINE 
i IN ACCORDO CON DX 


C064 LDY «SC6 
C 066 TXA 
C067 BNE SC06B 
C069 LDY «SE6 
C06B STY SC13E 
C 06 E LDY «SEB 
C070 LDX «S00 
C072 SEC 
C073 LDA SSF 
C075 SBC SSB 
C077 STA SFD 
C079 LDA S60 
C07B SBC SSC 
C07D STA SFE 
C07F BPL SC0B6 
C081 LDX «S04 
C083 JSR SC000 
C 086 STY SC16A 
C08S STX SC16E 
C08C STX S59 
C08E STX SSA 
C030 LDY «SC6 
C092 TXA 
C 09 3 BNE SC097 
C095 LDY «SE6 
C097 SIY SC17L 
C09A LDY «538 
C09C LDA «SES 
C09E CPX «S00 
C0A0 BNE SC0A6 
C0A2 LDY «S18 
C0A4 LDA *S6S 
C0A6 STY SC14B 
C0A9 STA SC14B 
C0AC STA SCISI 
C0AF STA SC1S7 
C0B8 STA SCI SD 
C0BS LDA *SLA 
C0B7 STA SCI 73 


C0BA LDA SFS 
C0BC BNE SC0C0 
C0BE LDA SFA 
C0C0 BNE SC0DD 
C0C2 LDA *S60 
C0C4 STA SC173 
C0C7 CLC 
C0C8 BCC SC0CD 
C0CA JSR SC 168 
C0CD JSR SCIBO 
C0D0 LDA S4E 
C0D8 CMP SSF 
C0D4 BNE SC0CA 
C0D6 LDA S4F 
C0D8 CMP S60 
C0DA BNE SC0D4 
C0DC RIS 
C0DD INC SFS 
C0OF BNE SC0E3 
C0E1 INC SFA 
C0E3 INC SFD 
C0ES BNE SC0E9 


CARICA Y CON COD. DECS 

SE DX NEGAI IUO SALTA 
CARICA Y CUN COD. INCS 

CARICA Y CUN COD. INX 
E X CON S00 
CALCOLA DY-Y8-Y1 
CIUE ' LA DIFFERENZA 
TRA LE ORDINATE DEGLI 
ESTREMI DELLA LINEA 


SE DY POS1TIUÙ BALIA 
COMPLEMENTA IL RISULT. 
MODIFICA LA ROUTINE 
IN ACCORDO CON DY 


CARICA Y CON COD. DECS 

SE DY NEGAI IUO SALTA 
CARICA Y CON COD. INCS 

CARICA Y CON COD. SEC 
E A CON SBCS 


SALTA SE DY NEGATIVO 
CARICA Y CON COD. CLC 
E A CON COD. ADCS 


CARICA A CUN LUU . NUP 
PER ESEbUlRE LINEA 
NON PARALLELA ALL'ASSE 
OELLE ORDINATE 

SE UXOI9 SALTA 


CARICA A CON COD. KTS 
ED ESEGUE LINEA 
PARALLELA ALL'ASSE 
DELLE ORDINATE 


: CONTROLLA SE LA LINEA 
E' STATA COMPLETATA 


CALCOLA UY/DX 
CIOÈ' IL COEFFICIENTE 
ANGOLARE DELLA LINEA 
iDA TRACCIARE 
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C0E7 INC SFE 
C0E9 LUA >H0 
C0EB SI» SFB 
C0EO STA SFC 
C0EF SIA SF7 
C0F1 STA ITU 
C 0 FJ lux «sei 
C0FS LDA SF7 
C0F7 SEC 
C0FU SBC SF9 
C0FA TAY 
C0FB LDA SFU 
C0FD SBC SFA 
C0FF BCC *C10b 
C101 SIA SFb 
C103 TYA 
C104 STA SF7 
C10b KUL SFB 
C10B ROL SFC 
C10A KOL SFU 
C10C ROL SFE 
C10E KOL SF7 
CI 10 ROL SFU 
Cile OEX 
CI 13 BNE SC0FS 
CHS LDA SF7 
CI 17 BNE SC11D 
CHS LDA SFU 
CUB BEO sciei 
CI 10 LUX NS00 
CUF INX 
Cie0 INC SFA , X 
ciee beo sci if 

C184 LUY RS01 
ciee LDA SFD 
Ciee BNE SCI 30 
CIBA LDA SFE 
CISC BNE, SCI 30 
C1SE LDY RS00 
C130 STYSS0 
C13S CLC 
C133 BCC SC140 
C13S LDX SS 7 
C137 DEX 
C13B STX SS7 
C13A CPX RSFF 
C13C BNE SC140 
C13E DEC S5U 


C140 LDA SSB 
C14S STA S4E 
C144 LDA SSC 
C14B SIA S4F 
CI 48 CLC 
C149 LDA SSB 
C14B A OC SFB 
C14D SIA SSS 
C14F LDA SSA 
Cibi ADC SFC 
C153 STA S5A 
C1S5 LDA SSB 
C1S7 ADC SFU 


BUOI INE DI 


UIOISIUNE 


RISULTATO IN SFE-FD 
; (PARTE INTERA) 

; E IN SFC-F'B 


(PARTE DECIDALE) 
RESTO IN SFB-F7 


SALTA L ' AKkUIUNDArlENIO 
PER ECCESSO 
SE NON CE' KES10 


ARRUIONDADENIO 
DEL RISULTATO 

SE COEFF- ANO. >-l 
DETTE FLAb -1 


ALTRI DENTI FLAG-0 
INIZIA ESECUZIONE 

INCRED. 0 UECKED . 
ASCISSA IN ACCQKUU CON 
□X 

I CODICI OEX E DEC SSB 
POSSONO INFATTI 
U10ENTARE INX INC SSd 
IN BASE AL StUNO DI OX 
(OEUI SC04U-C0OB) 

CONSfKOA OALOKE 
ORDINATA pIIUALE 

1 NCREDEN I A 0 UECKED . 
ORDINATA TRADITE IL 
CQEFF. ANO. 

I UAKI ADCS U BERREBBE- 
RO SBCS SE DY<0 
(OEUI SC06E-C0B7) 


C1SS STA SSB 
C15B LDA SSC 
C1SU ADC SFE 
C1SF SIA SSC 
Cibi JSK SCI BD 
Clb4 LDA S50 
Clbb BEO SCltìU 
C168 LUX S4E 
CIBA INX 
C16B STX S4E 
CI 60 CPX «S00 
C16F BNE SC173 
C171 INC S4F 
CI 73 NOP 
C174 LDA S4E 
C17fa CDP SSB 
C178 BNE SCISI 
C17A LDA S4F 
C17C CDP SSC 
C17E BNE SC17B 
C1B0 LDA SS/ 
ciee cdp ssu 
C1B4 BNE SC13S 
CI 06 LDA SSU 
C1BB CDP SSE 
CIBA BNE SC1U4 
C1BC KIS 


PLOITA IL PUNTO 
CONTROLLA FLAO 
SE COEFF. ANG . < 1 SALTA 

INCREDENTA U DECRED. 
(STESSE CONSIDERAZIONI 
PRECEDENTI) L'ORDINATA 
FINCHE' NON UIENE 
RIEDPITO IL UUOTU TRA 
DUE PUNTI DI ASCISSA 
.DIFFERENTE 


RIPETI FINCHE' LA 
LINEA NON E' 
IERDINAIA 


ROUTINE PRINCIPALE DI PLOT 


CIBO 

C10F 


CIBI 
C193 
CI 35 
C196 
C13U 
C19A 
CISC 
CIBO 
C13F 
C1A1 
ClAg 
C1A4 
CI Ab 
CI AB 
C1A3 
C1AB 
CIAD 
CIAF 
CIBI 
CIBB 
C1B3 
C1BS 
C1B6 


C1B9 

CIBA 

C1UC 

C1BE 

C1C1 


RTS 
LDA 3 
CDP « 

BCC SC13D 


SEC 

SBC SF7 
SIA SF'7 
LDA SC1EC , 
CLC 


SE IL OALOKE X E' 
INFERIORE A ebb 
CONTROLLA LE Y 
SE E' SUPERIORE A SU 


SE E 'INFERIORE A 3B0 
CONTROLLA LE Y 
ALT R IMENI I 
ESCE 

SE IL OALORE Y E' 
SUPERIORE A SSB 
ESCE 

SE IL OALORE Y 
E' INFERIORE A Z00 
ESEGUE PLUT 
ALTRIDENI 1 ESCE 
PRENDE I PKIDI 3 BIT 
DI Y E 
LI SALOA 
PRENDE Y 
UIUIOE PER 4 

SCARTA IL BIT 0 
USA IL RISULTA10 CODE 
; PUNTATORE ALLA 
TABELLA UOOE PRENDE 
UN BYTE BASSO 
A CUI SOTTRAE I PRIDI 
IRE BIT DI Y 
SALOA 

; PRENDE UN BYTE ALIO 
DALLA TABELLA 


C1CS ADC SSB 
C1C4 STA SF8 
C1C6 LDA SS 7 
C1CB AND «SFB 
CICA TAY 
Cica LDA SS7 
C1CD AND BS07 
cicf jmp SC 224 


ADDIZIONA IL BYTE ALTO 
□I X E SALVA 
PRENDE I BIT 3-7 DI X 
E LI METTE NEL 
REGISTRO Y 

MEI TE NELL 'ACCUMULAI 0- 
RE I PRIMI d BIT DI X 
ESEGUE PLOT MULTI CQLUR 

0 HIRES SECONDU 

1 CASI 


PLOT HIRES 


CICF TAX ; QUESTE DUE ISTRUZIONI 

C1O0 LDA SC1E3.X COSTITUISCONO 

(JMP SC224 OUANDU f 
; ABILI TATO IL MODU HIRES 
C1U3 LDX S02 ; SE IL COLORE E' ZERO 

ClOS BEO SCI OC ; ESEGUE UNPLUT 
C1D7 ORA (SF75.Y (PUTITA il PUNlU 
C1DS STA CSF7T.Y ; INDICATO OAI 
(PUNTATORI 

C1DB RTS 


UNPLOI 


C1DC EOR «SFF (CANCELLA IL PUNTO 
CIOÈ AND CSF7 ), Y (INDICATO DAI 
CI Eia SIA CSF7),Y [PUNTATORI 
C1E2 RTS 


[DA PLOTIARE 

C22P' LDA SC03A.X (RIPRENDE CUPPlH t LA 
C232 LDX S02 [MOUIFICA IN ACCORDO 
C234 AND SC03E.X (CON COLORE SCELTO 
C237 ORA CSF7T.Y (PLOTIA IL PUNTO 
C239 STA CSF7 ) , Y ; INUICATU DAI PUNIAT. 
C23B RTS 


NEW ERRORS ROUTINE 


C23C LDA «S47 
C23E STA S0300 
C241 LDA BSC2 
C243 STA S0301 
C246 RTS 
C247 STX SFE 
C24S LDA HS20 
C24B AND SD011 
C24E BEO SC2SS 
C2S0 LDA «80E 
C252 STA SFB 
cesi LDA RS0E 
C256 JSR SCSCF 

C2SS LDX SFE 
C2SB bMl SC2b0 
CeSD JMP SR43A 
C2S0 JMP SA474 


I AGGIORNA I PUNTATORI 
; PER LA NUOVA ROUTINE 
ìUI ERRORE 


CONSERVA COU. ERRORE 

SE- IN MODO TESTO 
SALTA 

AL1R1MEN1 1 TURNA AL 
MODO TESTO CON IL 
COLORI AZZURRO PER 1 
CARATTERI E BLU PER LO 
SFONDO 

RIPRENDE COU. ERRORE 
SALTA SE CUU.XSF7 
ESEGUE EKROR KUUIINE 
ESEGUE READY ROUTINE 


TABELLA PER INDIVIDUAZIONE BIT 
C1E3 B0 40 20 10 08 04 02 01 

TABELLA PER INDIVIDUAZIONE BYTE 
SULLA MAPPA GRAFICA 


C1EB 07 FE C7 
C1F3 07 FS C7 
C1FB 07 F4 C7 
C203 07 EF C7 
C20B 07 EA C7 
C213 07 ES C7 
C21B 07 E0 


FC 87 FB 47 FA 
F7 87 Fb 47 FS 
F2 87 FI 4/ F0 
ED 87 EC 47 EB 
EB 87 E7 47 Eb 
Ed 87 E2 47 ET 


C263 LDA 
C2BS STA 
C2B7 LDA 
C269 STA 
C2BB LDX 
C2BD TAY 
C2BE SIA 
C270 INY 


«SE0 (POSIZIONA PUNTATORI 
SFA (ALL'INIZIO DELLA 

BS00 (PAGINA GRAFICA 
SF9 ; 

«S20 


CSFS), 


(AZZERA TUTTI I BYItS 
DELLA PAGINA GRAFICA 


C271 BNE SC2SE 
C273 JNC SFA 
C27S DEX 
C27B BNE SC26E 
C27B RTS 


C21D NOP 
C21E NOP 
C21F NOP 
C220 NOP 
C221 NOP 
C222 NOP 
C223 NOP 

PLOT MULTICOLOR 

C224 LSR , A 
C225 TAX ; 

C22B LDA SC03A.X [PRENDE COPPIA DI BIT 
;DA TABELLA MULTICOLOR 
C229 EOR *SFF ; SPEGNE EVENTUALI BIT 
C22B AND CSF7),Y [GIÀ' ACCESI IN CORRI- 
C22D STA CSF7),Y [ SPONDENZA DEL PUNTO 


udiri i iwu 


C27S LDA RSCC 
C27B SIA SFA 
C27D LDY #S00 
C27F SI Y SFS 
C2B1 LDA SFB 
C283 A5L , A 
C284 ASL .A 
C2BS ASL , A 


POSIZIONA PUNTATORI 
ALL'INIZIO DELLA 
MEMORIA DI SCHERMO 

PRENDE COLORE DEI 
PUNII ACCESI E LO 
MOLTIPLICA PER 16 


C28S ASL 
C287 SIA 
C2BS LDA 
C28B AND 
C2BD CLC 
C2BE ADC 
C290 LDX 
C292 SIA 
C294 INY 
C295 BNE 


SFU 

SFC 

«S0F 


l CONSERVA RISULTATO 
[PRENDE COLORE DEI 
[PUNTI SPENTI 


SFU 


[SOMMA 1 DUE COLORI 


CSFS) , Y (METTE KISUL1A1U 

;IN TUTTE LE LOCAZIONI 
SC2S2 (DELLA MEMORIA 


Commocore 



C£37 INC SFA 
C£33 UEX 
C£3A BNE SC£3£ 

cesc KT3 

ceso LOA SFU 
C£3F BEU SC2H7 


; U I SCMEKHU 


ISIkUZ. NON U11L122A1A 
IUED 


ceni lda 
C£A3 ORA 
C£Ab SIA 
C£A3 LOA 
C£AB SIA 
CSA E LOA 
C£BB ANO 
C£B3 STA 
C£Bb R1S 
C2B7 LOA 
C£B3 ANO 
C£BC STA 
C£BF LOA 
C2C1 STA 
C£C4 LOA 
C£Cb ORA 
C£C3 .SIA 

cecc loa 
C£CE SIA 

ceui ris 


«seu 

subii 
SUBII 
«S3U 
SDB1U 
MFC 
SUUBB 
suo bb 

«SUF 

SUBII 

SOB11 

M13 

SUB1U 

«S03 

SOUBB 

SUUBU 

SFB 

saeus 


; ABILITA HUUU 


ORAF ILO 


; ABILITA HOULI TESIO 


TKASFOKHA COORDINAI E 30 IN £0 


C2EC LOA 
L£EE SIA 
C£F0 SIA 
C£F£ BEO 
C£F4 LOA 

cere sta 


«SBB 

sei 

Sb3 

SC34S 

«sue 

SBl 


INIZ1ALIZZA FLAbS 
PER FLUÌ 

EO ESEGUE TRASFURHAZ. 
INIZ1AL1Z2A FLAbS 
PER CIKCLE/AS'C 


C£FB STA 
CSFA LOA 
C£FC STA 
C£FE BEU 
C300 LOA 
L3B£ SIA 
C304 LOA 
C30B STA 
C30U LOA 
C30A STA 
C30C LOA 
C3BE SIA 
C310 LOA 

caie sia 

C314 LUY 
C316 LDA 
C313 STA 
L31B LOA 
C31E STA 
C3£0 LOA 
C3£S STA 
C3£4 JSR 
C3£7 LOA 
C3£3 STA 
C3£B LOA 
C3£U STA 
C3£F LOA 


Sb3 

«SBB 

Sb£ 

SC3BC 

■ SBl 

S61 


ED ESEGUE TRASF0RHA2. 
1NIZIALIZZA FLAbS 
; PER URAld 


S0b 

se 

so 

FE 

SE 

FF 

se 

0£U4, 

F7 

0EU5 , 


; ESEbUE I RASE ORflAZ 1 ONE 
; 01 X£ PER ORALI 
iti 01 RX (KAbbIGJ 
; PER ClkLLE/ARL 
; FLAb 

i PRENDE 2£ OPPURE 21 
; SECONDO CHE SIA IN 
iESECUZ. ORALI U LIRLLE 


1SB0 

IS1 

bC3U3 


FLAB X/Y 
SETTATO PER X 
IRASFORHA 30 IN £0 


BSD ; CONSEROA RISULTATO 

BFE j V 

USE ; 

BSF ; I DEH PER Y£ 0 RY 


L331 SIA SFE 
C333 LOA SbB 
C33S SIA SFF 
C337 LOA RSB1 
C333 SIA S51 
C33B JSR SC3BU 
C33E LOA SFO 
C340 STA SSF 
C34£ LOA SFE 
C344 STA SbB 
C346 LOA SS7 
C34U STA SFE 
C34A LDA SSB 
C34C SIA SFF 
C34E LDA S0£U4 
C351 STA SF7 
C3S3 LOA S0£US 
C3SS SIA SFU 
C3SU LDA RSBB 
C3SA STA SSl 
C3SC JSR SC3UJ 
C35F LOA SFU 
C3S1 STA SS7 
C3GJ 'LOA SFE 
C36S STA SSB 
C367 LOA SSB 
C3S3 STA SFE 
C3B8 LOA SSC 
C36D SIA SFF 
C3SF LOA «SBl 
C371 STA S51 
C373 JSR SC3BU 
C37b LDA SFU 
C37B STA SSB 
C37A SIA S4E 
C37C LDA SFE 
C37E STA SSL 
C3B0 STA S4F 
C38£ RTS 
C383 LDA «SBB 
C3US STA SF3 
C387 INC SFH 
C3BS BNE SC3UU 
C38B INC SF3 
C38D LDA SFF 
C3HF STA SS0 
C3S1 BPL SC33U 
C333 LUX MBS 
C33S JSR SCBBB 
C33U LOA «SBB 
C33A SIA SFU 
C33C LDA «SIS 
C3SE SIA S5£ 
C3A0 LOA «SBB 
C3A£ SIA SFC 
C3A4 STA SFU 
C3Ab SIA SFA 
C3AU SEC 
C3A3 LOA SFA 
C3AB SBC SF7 
C3AU TAY 
C3AE LDA SFB 
C3BB SBC SFU 


FLAb X/Y 
SETTATO PER Y 
IRASFORHA 30 IN £0 

CONSEROA RISULTATO 


PRENOE SEHPRE ZI 


FLAG X/Y 
SEI1AIU PER X 
lkBSFUKHA 30 IN £0 

CONSEROA RI SUL) AIO 


IDEH PER Y1 


FLAb X/Y 
SEITA1U PER Y 
TRASFURHA 30 IN £U 


; CONSEROA IL RISULTATO 


; DISTANZA P.TO 01 OISTA 
; DALLO SCHERNO 0-£Sb 
ì UZ-U*Z 


CONSEROA BYTE ALIO X/Y 
COHE FLAb PÙS./NEb. 

SE COORDINATA NEGAI 10A 
COHPLEHENIA A £ 

INIZI AL IZZA UIUIOENOU 

3D-XY«0 

UIOISIONE 

2D-3D/02 


- Commodore 



lINIZIALlZZA PUNTATORE 
; ANGOLO FINALE 


C3B2 IAX 
C3B3 LDA SFC 
CJB5 SBC SFS 
C3B7 BCC SC3BF 
C3BS SIA SFC 
C3BB SIX SFB 
C3B0 Siy SFA 
C3BF KOL SFU 
C3C1 ROL SFE 
C3C3 KOL SFF 
C3CS ROL SFA 
C3C7 KOL SKB 
C3CB ROL SFC 
C3CB DEC SS2 
C3C0 BNE SC3AB 
C3CF LUA SB0 
C3U1 BPL SC30A 
C303 LUX •SUI 
C30S LDA SFE 
C3D7 JSK SC000 
C30A DEC Sfa3 
C30C BPL SC3FB 

C30E LOA SS1 
C3E0 BNE SC3EB 
C3E2 LOA HSA0 

C3E4 BNE SC3EB 
C3E6 LOA WSB4 

C3EB CLC 
C3ES AUC SFU 
C3EB SIA SFU 
C3ED LDA SFE 
C3EF AOC «S00 
C3F1 SIA SFE 
C3F3 BCC SC3FB 
C3FS DEC SFE 
C3F7 LDA «SFF 
C3FS SIA SFU 
C3FB KIS 


; KISULIAIO IN SFU-FE 


NON COnPLEriEN 1 A SE 
SE FLAG PUS/NEU<S7F 
ALIKInENl 1 

COriPLElIEN 1 A KISULIAIO 
FLAb RAbblU/CUOKU INAIA 
SALTA SE HA CALCOLAI O 
RAGÙ IO 
FLAb X/Y 


sonriA sa0 se ma 
CALCOLATO X 

SonriA *64 SE HA 
CALCOLA ro Y 


; SE C'E ' OCEKFLOW 
KISULIAIO-SFFFF 


TABELLA 1NU1K1ZZ1 


C432 LOA «SE4 
C434 SIA SIS 
C436 LDA «S02 
C43B SIA SIA 
C43A JHP SC4BB 


; ESEGUE CIKCLE 


ROUTINE CALCOLO COORU INAIE 


C43D LDY «S02 
C43F LOA ftSAB 
C441 JSK SBBA2 
C444 JSR SE2BB 
C447 LDY «S02 
C44S LDA «SB7 
C44B JSK SBA2B 
C44E JSR SB1AA 

C4S1 TAX 
C4S2 IVA 
C453 CLC 
C454 ADC S02BE 
C457 SIA S02CB 
C4SA IXA 
C4SB AOC S02BF 
C45E STA S02CC 
C461 LUY «S02 
C463 LDA MSAB 
C465 JSR SBBA2 
C4BB JSK SE2B4 
C4SB LUY «S02 
C46D LDA «SB2 
C4BF JSR SBA2B 
C47B JSK SB1AA 
C47S TAX 
C476 IVA 
C477 CLC 
C478 AOC S02BC 
C47B STA S02CS 
C47E IXA 
C47F ADC S02BU 
C482 SIA S02CA 
C4BS RIS 


CALCOLA ORDINATA DI UN 
PUNTO DEL CERCHIO 
TRASFERISCE ANO. INIZ. 
IN FAC (AREA UT LAUORO 
DEL BASIC) 

ESEGUE SENO U1 FAC 

flOLTI PLICA 
RY-FAC 

CONCERIE FAC DA 
FLOATING IN INTERO 


SOnriA L'ORDINATA DEL 
CENTRO UEL CERCHIO E 
CONSERUA IL RISULTATO 


STESSO PROCEDIMENTO 
PEK CALCOLARE ASCISSA 
DEI PUNTO DEL CERCHIO 
ESEGUE COSENO DI FAC 


l RX*FAC 

l CONCERIE FAC IN INI ERO 


SOMHA L'ASCISSA UEL 
CENTRO E CONSERCA 
IL KISULIAIO 


C3FC .WORD SC60U (PLOT) 
C3FE . WOKU SC620 (OKAU) 
C400 . WORD SCbJS (CIRCLE) 
C402 .WORD SCB42 (ARO 
C404 . WORD SC2bd (CLEAK) 
C406 .WORD SC6AA CGRAF) 
C40B .WORD SC6CA (TEXI) 
C40A . WUKU SC6EA CnGKAF) 
C40C .WORD SC72A (COLOR) 


ROUTINE PRINCIPALE DI ARC 
C4S7 LDX «S04 

C423 LDA S02UF.X : TRASFERISCE IL CALORE 
C42C STA S02AB.X : DELL 'ANGOLO INIZIALE 
C42F DEX t 

C430 BPL SC42S 


ROUTINE PRINCIPALE DI CIRCLE 


C4BS LOA «S00 
C4BB SIA S02A8 
C4BB STA S02AS 
C.48E STA S02AA 
C4SX STA S02AB 
C4S4 SIA S02AC 
C4S7 LDA «SE2 
C4SS STA SIA 
C4SB LDA «SES 
C4SD STA SIS 
C4SF LOA US 7 E 
C4A1 SIA S02AD 
C4A4 LOA «S20 
C4A6 STA S02AE 
C4A9 LDA «SDS 
C4AB STA S02AF 


ANG. INIZ . “0 


INIZIALIZZA PUNÌ AIORI 
ALL'ANGOLO FINALE 

STEP-PIGRECO/40 
(RAPPKESENlHZlUNE IN 
FLOATING PU INI) 


Commodore - 69 



C4C0 LOP SBE 
C4C2 JSR SB3S1 
C4CS LDX *SBd 
C4C 7 LUY «SUB 
C4CS JSK SbBU4 

eiee lop ss7 

C1CE STO S0BBC 
CIDI LOP SSb 
C4D3 SIP S0dbU 
CI DB LUY S5F 
CI DB LDP S60 
C4DP JSR SB3S1 
C4DD LDX «SB7 
C4DF LDY WS02 
C1E1 JSK SBbU4 
C4E4 LDP SSB 
C4EB SIP S0BBE 
C4ES LDP S5C 
C4EB SIP *0BbF 
C4EE LDP «S00 
C1F0 SIP SBS 
C4F2 JSR SC13U 
C4FS LDP S0BLB 
C4F8 SIP S02C3 
C4FB LDP S0BCP 
C4FE SIP S02C4 
CB01 LDP S0dCB 
C504 SIP S02C7 
CS07 LDP S0BCC 
CS0P SIP S06CB 
CS0D LDY ff$0d 
CS0F LDP *SPb 
CS11 JSR» SBBPd 
CS11 LQY. KS02 
CS16 LDP »SPU 
C510 JSR SB8B7 
CS1B LDY #S0d 
CS1D LDX «SPb 
CS1F JSK SBBU1 

csee ldp sxs 

C524 LUY SIP 
C556 JSK SBCSB 
C52S CMP «SFF 
CS5B BEU SCS3B 
CS2D LDP «S01 
C58F SIP SBS 
CS31 LDY HS04 
CS33 LDP CS1S), 
CS3S SIP S08PB, 
C538 DEY 
CS3S BPL SCS33 
CS3B JSK SC430 
C53E LDX «S0S 
C540 LDP S0BC3, 
C543 SIP S57.X 
CS45 DEX 


KX IN FLOPTINb PO INI 

CONSEKUP RX FLOPIINB 
TKPSFEKISCE XI 

KY IN FLOPTINB 

CONSEKUP KY FLOPIINB 
TKPSFEKISCE Y1 

PONE - 0 

FLPB FINE ESECUZIONE 
CPLCOLP COUKD. PUNIU 


j Yl-Yd 

•PONE IN FPC 
iWPLOKE OELL'PNBOLO 
; PI TUPLE 

! FPC-FPC+STEP 

; IL RISULIPIO E * 

; IL NUOOO PNB . PTfUPLE 

; CODPPRP FPC E PNB .FIN. 

; SE FPC >“ UI PNB. FIN. 

; PONE FLP6 
; FINE ESECU2.-1 

’ ; L ' PNB .FIN. UIOENIP 
’ ; PNB . PTIOPLE 

; CPLCOLP COOKD. FON IO 

; TKPSFEKISCE 
; XI Y1 xe Y a 



PRENDE TRE PPRPMETK1 


CS8F JSK SCS7C 
CS32 CPX »Sd4 
CS84 BEO SCSSF 

CS96 JSK SB1PP 
CSSS SIY S0BU0 

esse sip s 0 dui 

CS3F JSK SPEFU 
CSPB JSR SCS7C 
C5P5 CPX *Sd4 
C5P7 BEO SC5B2 
CSPS JSK SB1PP 
C5PC SIY 50202 
CSPF STP S02D3 
esse JSR SPEFD 


CONTKOLLP L’OPZIONE S 
SE LP RISCUNrRP 
LPSCIP IL OECCHIO UP- 
LORE 

PL1 KIF1ENI I PRENDE IL 
NUOUO OPL0RE 

E CONTKOLLP LP OIKBOLP 
RIPETE PER IL 
SECONDO OPLORt 


70 - Cc 



CSBS JSK SCS7C 
CSBB CPX #Sd1 
CbtìO BEU SCSCB 
C5BC JSR SB1AA 
CSBF TAX 

esce BPL scscs 
esce jnp sbbib 

CSCS SI Y *0dU1 
esca sta seeus 
CSCH KTS 


E ANCMt PER IL TbRZU 


SE IL VALORE OtL PARA- 
nEIRU Z E' NEVAI IVO 
I LLbGAL OUANII1Y 

ALI RI MENI I RITORNA 


C6dF JSR SC5SE 
C63d JSR scelti 
C63S JSR SCS60 

esse rts 


I OBLI E LA RUM 
ESEUUb DRAUI 
RinETIE LA RUM 


••• CIRCLE 


Cb3S JSR SCSBK 
C63C JSR SCb7E 


C63K JHP SC1B6 


; PRENDE 3 PARAME1 RI 
; PRENDE I VALORI DEI 
RABBI E CONI ROLLA CHE 
SIANO POSITIVI 
; ESEGUE CIRCLE 


PRENDE DUE PARANE f RI 


CSCC JSR SAEKD 
CSCF JSR SCS7C 
CSDd CPX «Sdì 
CSOI BEO SCSDF 
CSD6 JSR SB1AA 
csos si y seeos 
CSDC SIA S0dU7 
C5DF JSR SAEFU 
CSEd JSR SCS7C 
C5ES CPX #Sd1 
C5E7 BEO SCSKd 
CSES JSR SB1AA 

csec si y seeoa 
csef sia seeus 
CSF2 RIS 


CONTROLLA LA VIRBOLA 
CONTROLLA L'OPZIONE S 
SE ESISTE LASCIA 1 
VECCHI VALORI 
ALI RI MENTI NE PRENDE 
DI NUOVI 

RIPETE PER IL SECONDO 
PARAMETRO 


PRENDE UN PARAMETRO POSITIVO 


C5F3 JSR SAEKD 
CSF6 JSR SC57C 
C5FS CPX HSdl 
C5FB BEO SC60C 
CSFD JSR SB1AA 

ceee tax 

C601 BPL SC60S 
C603 JMP SBdlti 
CB0G STY S0dUA 
C60S STA S0dUB 


CONTROLLA LA VIRGOLA 
CONI ROLLA L'OPZIONE S 
SE LA RISCONTRA 
LASCIA VECCHI U VALORE 
AL1RIMENII PRENDE 
IL NUOVO E SE UUES1U 
NON E' POSlIIVU 
1LLEBAL OVANTI (Y 


*** ARC 

Cbld JSR SCSUK 
CbIS JSR SCb7£ 


C61B JSR SAEKD 
CB1B JSR SCS7C 
CB1E CPX llSdl 
Cb50 BEO SC6SS 
CBSd LOX NSDK 
C651 LOY «S0d 
CbSb JSR SBBU1 
C6S3 JSR SAEFD 
C6SC JSR SCS7C 
C65F CPX «sei 
C661 BEO SCbbA 
C6S3 LOX «SEI 
C66S LDY «S0d 
CB67 JSR SBBOI 
CS6A JSR SAEKD 
C660 JSR SCS7C 
CS70 CPX «Sdì 

CS72 BEO SCb7B 
Cb71 LOX «SAU 
Cb7b LOY «S0d 
Cb7U JSR SBBDl 
CB7B JMP SC1d7 


PRENDE 3 PARAMETRI 
PRENDE I VALORI DEI 
RABBI b CONTROLLA CHE 
SIANO POSITIVI 
CONIULLA LA VIRGOLA 
CONTROLLA L'OPZIONE S 
SE R1SCON1 RATA PASSA 
AL PROSSIMO PARAMETRO 
AL1RIMENTI PRENDE 
L'ANGOLO INIZIALE E LO 
PONE A S0dUK-S0dE3 
CONTROLLA LA VIRGOLA 
CONTROLLA L 'OPZIONE S 
SE USATA PASSA AL 
PROSSIMO PARAMETRO 
ALTRIMENTI PRENOE 
L'ANGOLO FINALE E LO 
PONE A S0dE1-S0dE7 
CONTROLLA LA VIRGOLA 
CONTROLLA L’OPZIUNE S 
SE USATA 

LASCIA I VECCHI VALORI 
ALTRIMENTI PRENDE 
L ' 1NCREMEN1U E LO PONE 
A S0dAU-S0dB0 

ESEGUE ARC 


Cb7E JSR SCSCC 
ebbi LDA S0PU7 


PRENDE d PARAMETRI 
DEVONO ESSERE POSITIVI 


Cb0C RTS 
PLOT • 


Cb0D JSR SCStiK 
CB10 JSR SC01F 
Cbl3 JSR BCdbC 
Cblb JSR SC55E 
C61S JSR SCltìU 
C61C JSR SCSbU 
CB1K RIS 


PRENDE 3 PARAME1 R 
SPOSTA I VALORI 
METTE IN SD 
TOGLIE LA ROM 
ESEGUE PLOT 
RIMETTE LA ROM 


Cbd0 JSR SCStiF 
C6d3 JSR SCSCC 
C62b JSR SCSK3 
CBdS JSR SC0XS 
CbdC JSR SC300 


PRENDE 3 PARAMETRI 
PRENDE d PARAMETRI 
PRENDE 1 PARAMETRO 
SPOSTA I VALORI 
METTE IN dO 


Cbbb JMP baditi 
Cbtiti LDA S0dUS 
CbtiC BM1 SC6Ub 
C6BE RTS 

cbbK nup 

CbS0 NOP 


: ALTRIMENT 1 ERRORE 


ROUTINE VALUTAZIONE COLORI 


CBS1 JSR SB/SE 
CbSI CPX «S10 
CbSb UMI SCbSB 
CBSti JMP «Uditi 
CBSB SIX SEC 
C6SD JSR SAEFO 
CbA0 JSR SB7SE 
C6A3 CPX «S10 
CBAS BPL SCbSB 
CBA7 SIX SFB 


VALUTA ESPRESS. 0-dSS 
RISULTATO IN X 
SE >S0E 

1LLEGAL UUANT1TY 
CONSERVA CODICE COLURt 
CONTROLLA LA V1RBULA 
IDEM PER PARAME1 RO 
SUCCESS IVU 
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CbAS KIS 


CbAA JSK SCbSl 

CbAU jsk scava 

Cbblfl LDR "»th 
CbB8 ANU SO01b 
CbUb STA SUblb 
Cbtìb LDR USAR 
CbBA SfR SC1CF 

CbBU LDR NSBU 
CbBF SlR SCI DB 
C6C8 LOA «SEd 
CbCt SlR SC1U1 
C6C7 JMP SC8AI 


OALUI A COLUK 1 
SEI IR 1 COLUK 1 

KEStTIR Bll MULI 1 COLOR 

CRK1CR IN R CUD. 1RX 
LO flEirt NELLA KCJUI INE 
DI PLOI 

IN R CUD. LURS.X 
NELLA KUU1 . DI PLOI 
IN A SEd 

NELLA KOU1 . DI PLOI 
UA IN HIKES 


C6CR JSK SCbbl 
C6CD LDA SFC 

cscK sir «osai 

C6DH LDR «SUB 
CbD4 SlR SFR 
CbDb LUY "S00 
CbDB SI Y SFS 
C6DA LDA SFB 
CbDC JSK scaso 
Q6DF LDA #SEF 
CbEl AND SDOlb 
fcbE4 STA SUIdlb 
C6E7 JMP SCBB7 


ORLUIR COLUKI 
SETTA LOLUKE DI SFONDO 
INIZIAL1ZZA PUN 1 A 1 UH 1 
A INIZIO MEMORIA COLORE 
SETTA COLORE CARRI IERI 
KESETIA BIT riULT 1 COLOR 
OA IN MODO TESTO 


C7ZA JSK SB7SE 
C78U CPX USO 4 ! 
C7aF BUI SC734 
C731 jnp SB84B 

C73a srx soa 

C73b KIS 
C737 NOP 


«VALUTA I4-8SS 
SE >S0d 

ILLEUAL OUANTITY EKKUK 
CONSEKUA «VALORE IN S08 


ABILITA NUOVE ISTRUZIONI 


C73B LDA HS43 
C73A SIA S030B 
C730 LDA MSC 7 
C73F SlR S030B 
C748 RTS 
C743 JSK S0073 
C74b CflP NSSF 
C74B BEU SC7S0 
C74A JSR S007S 
C74D JHP SA7E7 

C7S0 LOA »S00 
C7S8 STA SFS 
C7S4 LDA SVA 
0756* STA SFC 
C7SB LOA S7B 
C7SA STA SFU 
C7SC LOY RS00 

C7SE BEU SC774 
C760 LDA SFC 
C768 SlR S7R 
C7b4 LDR SFU 


RbUIUKNA PUNrAIOKI 
PER K 1 CQNUSC I F1EN IO 
NUDO 1 COnANUI 


CONTROLLA L'ESISTENZA 
DELLA FRECCETTA 
SE NON E' PRESENTE 
ESEbUE LA RUOTINE 
NORMALE DELL' INI ERPRETE 
BASIC 

AZZERA L' INDICATORE 
DEL COMANDO DA ESEbUIRE 
SALUA I PUNTATORI 
AL CARATTERE CORRENTE 
NELLE LOCAZIONI SFC-SFD 

AZZERA IL PUNTATORE 
AI NUOUI COMANDI E 
INIZIA IL CONFKONIQ 
KIPUSIZIONA I 
PUNÌ A10K1 AL CARRI 1 ERE 
CORRENTE 


CbEA JSK SCbSl 
CbEU LDA SFC 
CbEF SIA *0081 
CbFZ LDA SFB 
CbF4 SIA SFU 
CbFb JSR SAEFU 
CbFS JSK SCbSl 
C6FC LDA MSUB 
CbFE STA SFA 
C700 LDY «S 00 
C708 SI Y SFS 
C704 LDA SFB 
C706 JSK scaso 
C70S LDA SFU 
C70B STA SFB 

C 70 D jsr scava 

C710 LDR «STO 
C7ie ORA SUOlb 
C71S SIA SOOlb 
C71B LOA #S4C 
C71R SIA SC1CF 
C710 LDA »S84 
C71F SIA SC1D0 
C788 LOA «SCa 
C784 SIA SC1U1 
C787 JMP SC8A1 


72 - Commodore 


; «VALUTA PRIMI 8 COLORI 
; SETTA COLORE 0 
! CONSEKUA 8' COLORE 
; CONTROLLA LA UlKbOLA 
: UALUIA 3 ' E 4 LOLUKE 

; INI ZI AL IZZA PUNÌ Al URI 
|a inizio memoria COLORE 
■SETTA COLORE d 


SETTA COLORI 8 E 1 
SCITA BIT MULI 1CUL0R 


CARICA IN A COO. JMP 
LO METTE NELLA PL01 
CARICA IN A S84 
LO METTE NELLA PL01 
CARICA IN A SC8 
LO METTE NELLA PL01 
UA IN MODO GRAFICO 


C76G STA S7B 
C7SB INC SFS 

C76R LDA «S0B 
C7BC CMP SFB 
C7BE BEO SC74A 
C770 INY 
C771 DEX 
C778 BNE SC7V0 
C774 LOA SC7AC , 


C777 TAX 
C77B JSR *0073 

C77B STA SFE 
C77U INY 
C77E LDA SC7AC. 
C7B1 CMP SFE 
C7BJ BNE SC760 

C7B5 OCX 

C7B6 BNE SC77B 
C7B8 ASL SFS 
C7BA LOX SFS 
C7BC LDA SC3FC, 
C78F STA S0d3F 


PASSA AL COMANDO 
SUCCESS 1U0 
SE I COMANDI 
SONU FINII 1 
SYNIAX EKRÙK 
AGGIORNA 1 PUNÌ ATOK 1 
ALLA PAROLA SUCCESS 1UA 

; PRENDE IL NUMERO DEI 
CARRI IERI DI CUI E' 
COMPOSTA LA PAROLA 
LI SALUA IN X 
PRENDE IL CARATTERE 
SUCCESS 1U0 E 
LU SALUA 
CONFRONTA CON UN 
; CARATTERE UELLA 
PAROLA IN ESAME 
SE UIUERSO PASSA ALLA 
PROSSIMA PAROLA 
PASSA AL SUCCESS IUO 
CARATTERE UELLA PAROLA 
SE UUESTA E' FINITA 
PRENDE I PUNTA1URI 
AL COnANUU 
;E LI PONE 
A S0JJF-0J40 



BRSAVE 


C79S INX 
C7S3 LOA 
C73tì SI fi 
C79S LDfi 
C7S8 sr« 
C79E LOA 
C7«a srfi 
C7A3 JSK 

C7fiS JSK 
C7AS JNP 


SC3FC , X 

siajnia 

ustia 

S0JJE 


S033E 

SA7AE 


ntllk IL CULI ICE 01 JSK 
NELL» LOCAZIONE S0JJE 
E UUtLLU 01 KTS 
NELLA LUCAZ1UNE MUTI 
PUNÌ A AL CANAPIERE 
SUCCESS IUU 
ESEbUE IL CUNANUU 
PASSA AL PKUSSinO 
CUNANUU 


TABELLA NU0U1 C0NANU1 


C7AC S0H 
C7A0 ' PLUI 
C7B1 S0H 
C7tìd ’DRAIU 
C7Bb S0b 
C7B7 'C1RCLE 
C7B0 S03 
C7BE ' AKC 
C7C1 S0's 
C7CZ 'CLEAK 
C7C7 S0H 
C7C8 '6KAF 
C7CC S0H 
C7C0 * 1EXT 
C701 S05 
C7D2 ‘N6KAF 
C707 S0H 
C7D8 ’ COL ’ . SB0 


(SCb0O) 

(»CbZ0) 

CSCb33! 

CSCbHZ) 

CSCZbS) 

( SCbAA ) 

CSCbCAj 

CSCbEAl 

C SC7ZA ) l SB0-COO I Li 


CHDA PLA 
C0LIB PLA 
LUOC LOA astia 
C80E STA SPA 
CBE0 LOA «SA0 
CBEB STA SFC 
CBEH LOA «SZH 
CUEb STA SCBCS 

CBES JSK SCBBH 

CBEC JSR SEI OH 
CHEF JSR SCSStì 
CBFZ LUX «SH0 
C8FH LDY «SBF 
CBFb LOA »SA0 
CBFb SIA SFE 
CBFA LOA «S00 
CBFL SIA SFU 
CBFE LDA «SPO 


CS00 JSR SFFDB 
CS03 JSK SCSb0 
CS0b BCC SCS0B 
CS0B jnp SE0FS 

CS0B KTS 


KINUOVE INUIKIZZU 
01 K1I0KNU 

INI ZI ALI ZZA BYTE ALIO 
OEI PUNTATORI 


CARILA IN A LOU. BUS 
NUU1F1CA LA ROUTINE 
UI 1 RASI EK 1 MENI U 
IRAFEK1SCE LA PALINA 
bRAK. UA SE000 A SA000 
SET FILE PARANE 1EKS 
OISABILITA BASIC 
IN X/Y ULTI NA LULAZ. 

UA SALVARE 

IN SFD.-PE PKINA LÙCAZ . 
OA SALVARE 

IN A 1NU1K1ZZU UEL 
PUNÌ A IURE ALLA PKINA 
LOCAZ. OA SALVARE 
SALVA RAN 
RIABILITA BASIC 
SE L"E - UN ERRORE 
ALLORA CONI RULLA 01 
COSA SI IRAI TA 


liRNEROE •** 

CS0C LOA «SII ;IN A COU. URAC J,Y 
CS0E BNE sesie ; 


URSAUE/ bRLOAU/GRVER I F Y/bRNERlSE 
ROUTINE 01 TRAFERINENIO 


CBBH LOA NS00 
CBBb STA SFS 
CBBU SIA SFB 
CBBA LOX RS80 
CBBC 1AY 
CBBO JSR SCS5E 
CBC0 JSK SCSSB 
CSC 3 LOA CSFSJ. 
CBCS BIT SFB 
C8C7 STA (SFB! , 
CBCS 1NY 
C8CA BNE SCBCS 

C8CC INC SFA 
CBCE INC SFC 
CBO0 OEX 
CB01 BNE SC8C3 


CBU3 JSR SCSbO 
CBOb JSR SCSb0 
C8US KTS 


INI ZI AL IZZA BY1E BASSO 
OEI PUNTATORI 

CONTATORE 01 BLOCCHI 
CONTAI URE UI BYTES 
OISABILITA KEKNAL 
OISABILITA BASIC 
: TRASFERISCE OA SE 000 

: A SA000 0 VICEVERSA 

RIPETE F1NU ALLA FINE 
UEL BLOCCO 
PASSA AL PRUSSINU 
BLOCCO 

RI PEI E FINCHE' NON HA 

TRASFERÌ IO 1UI II 1 
BLOCCHI 

RIABILITA KEKNAL 
RIABILITA BAS1L 


csi 0 loa «sen 

CSI Z SIA SCBCS 
CS1S LOA *SE0 
CS17 SIA SFC 
CS1S LOA «SA0 
CS1B SIA SFA 
CS10 LOA «S00 

CS1F BEO SCSZJ 


IN A COU. BUS 
N001F1CA RUUI. 1RASP. 

1 NI Z I AL 1 ZZA BY1E AL 1 U 
01 PUNTATORI 

UALOKE 01 LOAU PER 
PLAb LUAO/VER 1 F Y 


C9B1 LOA «S01 

C9ÉJ3 SIA S0A 
CSSS PLA 
CSZb PLA 
CSZ7 JSR SEI OH 
CSZA JSR SCSSB 
CSZU LOA S0A 
CSZF LUX MS00 
CSdl LUY «SA0 
CS33 JSR SFFUS 
CS3b JSR SC9b0 
C93S BCS SCS0B 


VALORE UI UEKIPY PER 
FLAb LOAU VERI F Y 
SE11A FLAb LOAU/VERI F Y 
KINUUVE INVI RIZZO 
UI RI 1UKN0 
SET FILE PARANE TERS 
OISABILITA BAS1L 
IN A FLAb LUAO/VER IF'Y 
IN X/Y LOCAZ. INIZIALE 
IN CUI CARICARE 0 VER. 
LOAU/ VER I KY 
RIABILITA BASIC 
SALTA SE CE' ERRORE 
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FLAG LOAD/UEKIFY 
SALI A bt tbtUUt LOAU 
IN X CULI . UEK1FY LKRUK 
Ltbbt bl 


RIABILITA BASIC 
RIABILITA INTERRUPT 
RIPRENDE A 


'0 LDA PS00 
’Z LDX PS00 
'4 BEO SC97A 


6 LDA #540 

8 LOX PS01 
A STA SB5 
C STX SB6 

E JSR SB79E 

i cpx ttsee 

3 BCC SC3B0 
S JMP SB240 

0 TXA 

9 LDX NS00 
8 JSR SCA45 


IN A/X INCREMENTO 
DI UCHAR 

CONSERTA INCREMENTO 

UALUTA INTERO 0-255 
DEUE ESSERE COMPRESO 
TRA 0-39 (COLONNA) 
ALTRIMENTI ILLEBAL 
QUANTI TY ERROR 


MOLTIPLICA IL UALORE 
PER 0 E CONSERUA IL 
RISULTATO IN SF7-F8 
CONTROLLA LA UIRGOLA 
E UALUTA 0-255 
DEUE ESSERE COMPRESO 
TRA 0-24 (RIGA) 


C995 STX SF9 
C997 LDA WS10 
C999 SEC 
C99A SBC SF9 
C99C ASL , A 
C99D TAY 
CS9E CLC 
C99F LDA SC1EB, 
C9A2 ADC SF7 
C9A4 AND «SFB 
C9A6 STA SF7 
C9AB LDA SC1EC, 
C9AB ADC SFB 
C9AD STA SFB 
C9AF JSR SB7F1 


C9B4 BCS SC9B5 
C9B6 STX SFB 
C9B0 ASL S>B 
C9BA ASL SFB 
C9BC JSR SAEFD 
C9BF JSR SAD9E 
C9C2 BIT S0D 
C9C4 BMI SC9CC 
C9CB JSR SBDDD 
C9C9 JSR SB487 
C9CC JSR SB6AS 


C9CF TAX 
C9D0 BEO SCA39 
C9D2 STA SFC 
C9D4 LDY «S00 
C9D6 STY SFD 
C9DB JSR SCA20 
C9DB BCC SCA02 


SOTTRAE 24 DAL UALORE 
DELLA RIGA 
MOLTIPLICA PER 2 


PRENDE INDIRIZZO DA 
TABELLA DELLA MAPPA 
GRAFICA E AGGIUNGE 
COLONNE*B SENZA CONSI- 
DERARE I 3 BYTES MENO 
S I GN IFICATIUI 

CONTROLLA LA UIRGOLA 
E UALUTA 0-255 
UALORE TRA 0-3 (SET DI 
CARATTERI) 

ALTRIMENTI ERRORE 


SE E' UNA STRINGA SALTA 
CONUERTE DA NUMERO 
A STRINGA 

PUNTATORI DELLA STRIN- 
GA IN S22-23 LUNGHEZZA 


AZZERA CONTATORE 
INDIUIDUA CARATTERE 
SE E' UN CARATTERE 
SPECIALE SALTA 

INDIUIDUA LA POSIZIONE 
DEL CARATTERE DA STAM- 
PARE NELLA ROM DEI 
CARATTERI 


RIABILITA INTERRUPT 
SE LA STRINGA E 1 STATA 
COMPLETATA ESCE 




CA09 ADC SF7 
CA0B STA SK7 
CA0D LDA SB6 
CA0F ADC IFB 
CAI 1 STA SF0 
CAI 3 BCS SCA1F 
CA1S CMP #SFF 
CA17 BNE SC9D8 
CA19 LDA SF7 
CA1B CMP #S40 
CA1D BCC SCSD8 
CA1F RTS 


DELLA PAGINA GRAFICA 
IN CUI STAI1PARE IL 
PRQSSinO CARATTERE 


SE LA LOCAZIONE ECCEDE 
; IL UNITE DELLA 
PAGINA GRAFICA ESCE 


ROUTINE CARATTERE 


CAB0 LDY 
CAB? LDA 

CAB4' INY 
CASS 1 STY 
CA27 TAX 
CA2B BNI 

CASA CNP 
CABC BCC 

CASE CNP 
CA30 BCC 
CA3S AND 
CA34 BNE 
CA36 AND 
CA30 SEC 
CASS RTS 
CASA AND 
CA3C CNP 
CASE BNE 
CA40 LDA 
CA4? CNP 
CA44 RTS 


SFD ; 

(S2?) , Y ; IN A CARATTERE DELLA 
; STRINGA 


SFD 


AGGIORNA CONTATORE 


SCASA 

#S?0 

SCASS 

#S60 

SCA36 

#SDF 

scaso 

#S3F 


SE COD. DEL CARATTERE 
; E * > S7F SALTA 
SE COD. < SS0 E’ UN 
; CARATTERE NON STANPA- 
; BILE QUINDI SALTA 


#S7F 

#S7F 

SCA4S 

#S5E 

#S?0 


; CARATTERI SHIFTATI 


ROUTINE NOLTIPL . PER 8 


CASS LDA #S11 
CA67 STA SC1D7 
CA6A STA SC237 
CA6D LDA #S91 
CABF STA SC82D 
CA72 RTS 


IN A COD. ORO.Y 
RINETTE A POSTO 
LA ROUTINE DI PLOT 
IN A COD. STACI. Y 
I DEN 


0 I SASSENBLATO DELLA ROUTINE DI HARDCOPY 
PER LA STANPANTE NPS 80? 


0334 LDA #S00 
0336 STA SFD 
0338 LDA NSE0 
033A STA SFE 
033C RTS 


; COLLOCA L'INDIRIZZO 
-.DELLA PAGINA GRAFICA 
i NELLE LOCAZ. SFD-FE 


0330 LDY 
033F JSR 
0342 LDA 
0344 STA 

0347 DEY 

0348 BPL 
034A JSR 
034D LDY 
034F LDX 
0351 LSR 

0354 ROR 

0355 DEX 

0356 BPL 
0358 STA 
03SB DEY 
035C BPL 
035E CLC 
035F LDA 
0361 ADC 
0363 STA 
0365 LDA 
0367 ADC 
0369 STA 
036B RTS 


#S07 

S036C 

CSFDl.N 

S037C,'i 

S034B 

S0374 

#507 

#$07 

S037C, ) 


DISABILITA RON 
; PRENDE 8 BYTES DALLA 
; PAGINA GRAFICA E LI 
CONSERUA NELLE 
LOCAZ. S037C-0383 
RIABILITA RON 
CONTATORE DI BYTE 
CONTATORE DI BIT 
; PRENDE IL BIT NENO 
SIGNIFICATIUO DI OGNI 
BYTE E LO PASSA IN A 

.CONSERUA RISULTATO 
RIPETE PER TUTTI E 8 
I BYTES 


SFD 

#S0B 

SFD 

SFE 

#500 

SFE 


AGGIORNA I PUNTATORI 
AL PROSSINO GRUPPO 
DI B BYTES 


CA45 LDY #S00 
CA47 STY SF8.X 
CA49 ASL , A 
CA4A ASL .A 
CA4B ROL SF8.X 
CA4D ASL , A 
CA4E ROL SF8.X 
CA50 STA SF7.X 
CAS? RTS 


NOLTIPL ICA A PER 8 
IL RISULTATO 
UIENE NESSO NELLE 
LOCAZ. SF7+X SFB»X 


036C SEI 
036D LDA #SFC 
036F AND S01 
0371 STA S01 
0373 RTS 


; DISABI L ITA INTERRUPT 
DISABILITA BASIC 
;E KERNAL 


0374 LDA #503 
0376 ORA S01 
037B STA S01 
037A CLI 
037B RTS 


RIABILITA BASIC 
E KERNAL 

! RIABILITA INTERRUPT 


CA53 JSR SB79E 
CA56 TXA 
CA57 BEO SCA65 
CASS LDA #551 
CA5B STA SC1D7 
CASE STA SC22D 
CA61 STA SCB37 
CA64 RTS 


UALUTA PARAN. 0-?55 

SE PARAN. -0 SALTA 
IN A CODICE EORO.Y 
NODI FICA ROUT. DI PLOT 
HIRES E NULTI COLOR PER 
OTTENERE INUERSIONE 


Disassemblato lente d’ingrandimento 
con le routines grafiFiche 3D. 

PRINO BLOCCO :SC806-SCBB0 

XC806 JSR SC5BF ; prende i parametri 

LOA S02D0 .e controlla che la x 



ìFeriore a 518 


STA S57 
LO» 50801 
»N0 «SFE 
BEO XCB1» 
XC81S LDX «S0E 

JMP <503003 
XCB1» LO» 50801 
ST» S5B 
LO» 50808 
SI» 553 
LO» 50803 
BNE XCB15 
LDA 50804 
ST» SSB 
LD» 50805 
BNE XCB1S 
LO» SCF00 
ONO #S0F 
ST» 55» 

LD» asse 
ST» SCFFB 
LO» #580 
ST» SCFF3 
LD» #503 
ST» 50015 
ST» 50017 
STA 50010 
LD» 55» 

ST» SD08B 
LD» SSB 
ST» 50087 
SEI 

LO» #535 
ST» 501 
LO» «500 
ST» S5E 
ST» 508 
JSR XCR73 
LOV #500 
LO» 557 
CLC 

»0C «SBC 
BCC XC878 
LDY #503 
XCB78 ST» 50000 
ST» 50008 
LD» 559 
CLC 

»0C #518 
ST» 50001 
ST» 50003 
LD» 558 
BEO XCBB9 
LOY #503 
XC8B9 STY SFB 

LD» SD010 
ANO «SFC 
OR» SFB 
ST» 50010 
LDX #540 
LOY #SFF 

XC839 LD» S03BF.X 
ST» XC»FF , X 


; ILLEGAL OUANTITY 
muove le coordinate 
nell'area di lavoro 
, e se la Y e' super i- 

;il messaggio di 


prende il colore 
e lo pone In SSb 
se e' superiore a 
855, errore. 

Prende il colore 
di fondo della 
pagina grafica 
dispone l'indirizzo 
di partenza degli 
sprltes 0 e 1 


accende gli sprltes 
e li allarga su 
X e Y 


; colora lo spelte 0, 
ideila lente e lo 
; sprite l.di copertura 


toglie l'interrupt 

azzera 1 registri 


definisce lo sprite 

le coordinate 
degli sprite 


, e se eccedono 855 
; setta 1' (1SB 


trasferisce lo 
sprite ingrandito 
e riempie lo sprite 
di copertura 


TY» 

ST» SCB3F.X 
OEX 

BNE XC899 
LO» #537 
ST» 501 
LD» #560 
ST» 50341 
CL1 
RTS 


rimette il S.O. 
e l'interrupt 
;e il codiCB di 
;RTS a 50341 


SECONDO BLOCCO :SC»73-5C»FF 


XCA73 LDA 559 
LSR .» 

LSR ,» 

LSR ,A 
»SL .» 

ST» SFB 
LD» «S»0 
ST» SFC 
JSR XCAE6 
LO» 557 
ANO #507 
TfcX 

LDA 557 
ANO NSFB 
ST» SS» 

LO» 559 
AND #507 
OR» 55» 

CLC 

»0C SFE 
BCC XC»9» 
INC SFF 
XC»9» ST» SFE 
LO» SFF 
CLC 

«OC SSB 
«DC #SE0 
ST» SFF 
LDY #500' 
XC««7 LD» C SFE) ", Y 
ST» 5005», Y 
LD» SFE 
CLC 

«OC «507 
BCC XCAB5 
INC SFF 
XC«BS ST» SFE 
INY 

CPY #504 
BNE XC»«7 
TX» 

BEO XCRCft 
XC«BF «SL SSD 
ROL S5C 
ROL S5B 
ROL SS» 

OEX 

BNE XC«BF 
XC«C» LDY S5E 
LDX #500 


prende le Y 
divide per B 
e moltipllca la 
parte intera per 380 


prende il byte basso 
delle x e usa 1 bit 
0-8 come puntatore 
al dot 

somma 1 bit 3-7 
della x ai bit 0-8 
della y 
e addiziona 11 
risultato al punta- 
tore al byte 


dispone la partenza 
della pagina grafica 
a SE000 

preleva 1 punti 
e li mette nell'area 
di lavoro convertendo 
al formato degli 


ripete per 4 bytes, 

e usando il punta- 
tore al dot 
esegue la centratura 


; usando il puntatore 
; sposta il risultato 



a SO3c0-03fe 


XCACE LOA SSA.X 

STA S03C0.Y 
INC S5E 
INY 
INX 

CPX HS03 
BNE XCACE 
INC S59 
INC S02 
LOA S02 

cup #sis 

BNE XCA73 
RTS 


ROUTINE DI MOLTIPLICAZIONE BINARIA, 
moltiplicandi: SFB-SFC 
risultato: SFE-SFF 


LOX MS60 .predispone per 
JMP SFFC9 ; output ed esce 


X9F1C JSR SABB5 
X9F1F LDA «S60 
JMP SFFC3 


predispone le perife- 
riche al default e 
chiude il canale 96 
ed esce 


X9F24 LDA *S00 
STA X9FEC 
LDA S5B 
BEO X9F3C 
CMP NS01 
BEO X9F36 
X9F31 INC X9FEC 
CLC 
RTS 


; cancella il byte di 
iout-screen 
se X<0 o X>319 


setta out-screen a 1 
e predispone punto 


XCAEE LDA «S00 


LDX «S0B- 
XCAEA ASL .A 
ROL SFB 
BCC XCAF6 
CLC 

AOC SFC 
BCC XCAF6 
INC SFB 
XCAF6 DEX 

BNE XCAEA 
STA SFE 
LDA SFB 
STA SFF 
XCAFF RTS 

Da SCB00 a SCB3E viene contenuto lo 
sprite del'la lente 
Da SCB40 a SCB7E viene contenuto lo 
sprite di copertura. 

Da SCBB0 a SCBFF spazio libero per 
altre routines LM a per due sprites. 


dispone la parte 
bassa del risultato 
a zero, e il numero 

shift a sinistra 
e addiziona se 
riscontra 1 nel carry 


ripete per otto bit 

, e pone il risultato 
; in SFE-SFF 


Oisassemblato routine Hard/Copy 601/803 

Indirizzo partenza: S9F00 
Indirizzo fine: S9feb 

Start: SYS 40704 

Per interrompere: RUN/STOP 


JMP X9FB9 


X9F1F 

«S60 

#S04 

#500 

SFFBA 

#S00 

SFFBO 

SFFC0 


chiude il file 
apre il canale 96 
sulla stampante 
con ind .secondano 0 

e nome nullo 


X9F36 LDA 
CMP 
BCS 

X9F3C LDA 
BNE 
LDA 
CMP 
BCS 
LDA 
AND 
STA 
LDA 
LSR 
LSR 
AND 
TAY 
LDA 
SEC 
SBC 


STA 

LDA 

CLC 

ADC 

STA 

LDA 

AND 

TAY 

LDA 

ANO 

TAX 

CLC 

RTS 


SS' 


X9F31 

S4F 

X9F31 

S4E 

#SCB 

X9F31 

S4E 

«S07 

SF7 

S4E 

#SFE 

SC1EB. 

SF7 

SF7 

SC1EC , ' 

S5B 

SFB 

S57 

#SFB 

S57 

«S07 


se Y<0 o Y> 199 
esce con punto spento 


della Y e li mette 
nel risulato 
divide per otto la Y 
e moltipllca per due 
la parte intera 
del risultato 
e lo usa come punta- 
tore alla tabella 
di conversione 
preleva i valori 
dalla tabella, 
sottrae loro il ri- 
sultato memorizzato 
in precedenza e li 
pone nel risultato 
dopo avere addizionato 
la parte alta delle X 
usa i bit 0-2 della 
parte bassa delle X 
come puntatori al dot 

puntatori al byte di 
schermo 


X9F6F JSR 
JSR 
LDA 
BNE 
LDA 
AND 
SEC 
BNE 
X9F82 CLC 
X9F83 PHP 
JSR 
PLP 


X9F24 

SC55E 

X9FEC 

X9FB2 

SC1E3. 

CSF7), 

X9F83 


controlla 1 limiti 
toglie il S.D. 
controlla 1 ‘out-screen 
se e ‘ a 1 predispone 
punto spento altri- 
menti controlla sulla 
pagina grafica se il 
punto e acceso o spen- 
to, dispone ì flag 


SC5ED 


e riprinstina il S.O. 


Commodore - 77 



X9F09 JSR X9F03 
lda ttsae 
JSR $AB47 
LDA #$C7 
STA SFB 

X9F9S LOA #$00 
STA $57 
STA $56 
STA S4F 

XSFSD LDX #$07 
STX $FD 
LDA $FB 
STA $4E 

XSFA5 JSR X9F6F 
ROR $FC 
DEC $4 E 
□EC $FO 
BNE X9FAS 
ROR $FC 
LDA $FC 
ORA #$60 
JSR SAB47 
LDA $91 
CHP #$7F 
BEO X9FDF 


la periFerica in modo 

riga di schermo 
e la X alla prima 
colonna 

dispone il numero di 
inviare alla stampante 

analizza il punto 
tornando con SEC o 
CLC e crea il byte da 
inviare in $FC 
decrementa la Y e 
il cantatore dei bit 
verticali , terminati l 
punti del byte setta 

RUN/STOP 

esce 


INC $57 
BNE X9FCS 
INC $56 
X9FC5 LDA $50 

BEO X9F9D 
LDA $57 
cnp #$40 
BNE XSFSD 
LDA #$0D 
JSR $AB47 
LDA $FB 
SEC 

SBC #$07 
STA $FB 
Cnp #$FC 
BNE XSF95 


altrimenti passa 
al prossimo punto X 

e se X e 1 uguale a 
320 



X9FDF LDA #$0F 
JSR $FFD2 
LDA #$0D 
JSR SFFD2 
JMP X9F1C 

X9FEC .BYTE 0 


; mette la stampante 
; in modo testo , 
i stampa un CR, 

chiude il canale 9B 
Flag di out-scrBen 


END ;!F ASSENBLY. 





Enti nel grande 


Club 


Fin dallo sbarco in Italia della Commodore Commodore Computer Club è il punto di rife- 
rimento di tutti gli utenti di C/64. Vie 20. C/16. t»lus 4 ed ora di PC 10/20 
ed Amiga. 

Articoli didattici, recensioni e programmi istruttivi ed a basso costo 
hanno fatto di Commodore Computer Club la prima rivista 
italiana d'informatica. 

Ma,per i lettori. Commodore Computer Club non è solo rivista: è 
consulenza telefonica gratuita, software originale pubblicato a late- 
re dalla stessa casa editrice, un ponte verso l'Informatica "maggio- 
re" anche attraverso la collaborazione con le riviste sorelle "Perso- 
nal Computer " e "Computer"' 

E' per questa ragione chc,anno dopo anno, aumenta il numero dei lettori che preferiscono ri- 
cevere la rivista in abbonamento invece di acquistarla in edicola. Ad essi l'editore riserva una 
serie di vantaggi esclusivi come: 

• un libro in omaggio da scegliere tra i titoli disponibili della collana I libri di Systems*; 
•l'uso di una linea telefonica speciale per richieste di consigli, e consulenza, il cui numero e le 
modalità d'uso verranno comunicale in forma riservala alla ricezione dell'abbonamento; 
•un canone annuo particolarmente interessante di lire 40.000 per 11 fascicoli di Commodore 
Computer Club e di lire 35.000 per 1 1 fascicoli di Personal Computer; 

•l'esclusivo canone cumulativo di lire 65.000 per 1 1 fascicoli di Commodore Computer Club ed 
1 1 di Personal Computer. 

•uno sconto del 10% su tutti gli acquisti per corrispondenza dei prodotti software su disco o 
cassetta, fascicoli arretrali o libri della Systems senza limiti di quantità. 

• / titoli disponibili sono Quelli reclamizzati sull'apposita pagina pubblicitaria "La libreria di Systems" 



X 


Inviatemi in omaggio il volume della collana i libri di Systems 

Registrate oggi stesso il mio abbonamento a n Commodore Computer Club (Lire 40.000) 

"1 Commodore Computer Club+ Personal Computer (Lire 65.000) 

17. Desiderando ricevere le copie ordinale con la massima urgenza, accludo assegno bancario n.ro 

Banca per lire voi .desialo 

ri Contentandomi dei normali tempi postai, ho inviato ogg stesso l'importo di lire a mezzo C/C postale N. 37952207 

intestalo a Systems Editoriale - V le Famagosta. 75 - 20142 Milano. 


via N.ro. . 

CAP 


Ritagliare e spedire in busta chiusa regolarmente affrancata a Systems Editoriale - V.le Famagosta. 75 - 20142 Milano, 


Vi 


5 



L 'immaginazione 
al potere 


LEGGO VR 
PERCHÈ 
HO UN’IDEA 
FISSA 
INTESTA 


Il lettore di VR Videoregislrare 
è giovane, dinamico, creativo. Di cultura 
e reddito superiore alla media, possiede 
spesso piu di un videoregistratore. 

oltre all’Impianto hi-fi e al 
computer: nel tempo libero, non 
rinuncia a viaggi in Italia e 
all’estero, e a cinema, teatro e 
spettacoli sportivi in genere. Usa 
il videoregistratore non solo per i 
programmi tv o preincisi, ma 
anche per riprendere i momenti 
felici in famiglia, per creare una 
videoteca personale. E tu, che 
lettore sei? 
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ENDA A AND * Modificato 

V OR - Non modificato 

M OR esclusivo MbfMe) Bit 7 (6) della memoria 





